การยกเลิกคำสั่ง เมื่อไม่มีการเติมค่า

[diamondbom]

เมื่อไม่มีการเติมค่า ผมออกแบบให้มี MsgBox แจ้งเตือน

แต่ยังเกิดการ Debug ทำอย่างไรดีครับ

หากต้องการให้โปรแกรมทำงานต่อหลังจากกด OK ของ MsgBox

[snasui]

ตัวอย่างการปรับ Code ตามด้านล่างครับ กรณีไม่เติมค่าให้ออกจาก Procedure

Code: Select all

Private Sub CommandButton1_Click()
    If TB1.Value = "" Then
        MsgBox "XXX"
        Exit Sub
    Else
        TB2.Value = TB1.Value * 1000
    End If
End Sub

[diamondbom]

ขอบคุณครับ