1
ห้อง MS Access / : Access Message Box ไม่ขึ้น
« เมื่อ: 15 พ.ย. 62 , 15:18:40 »
ต้อง Dim ...... as ....... ครับ
การกำหนดให้ค่า มากกว่า หรือ น้อยกว่า ได้จะต้องเป็นค่าตัวเลข นะครับเช่น
Private Sub Text0_AfterUpdate()
Dim Msg as string
Dim Report as Integer
Msg = "สไกล้หมดแล้ว"
Report = Me.Text0
If Report < 5 Then
MsgBox (Msg), vbInformation, "status"
End If
End Sub
การกำหนดให้ค่า มากกว่า หรือ น้อยกว่า ได้จะต้องเป็นค่าตัวเลข นะครับเช่น
Private Sub Text0_AfterUpdate()
Dim Msg as string
Dim Report as Integer
Msg = "สไกล้หมดแล้ว"
Report = Me.Text0
If Report < 5 Then
MsgBox (Msg), vbInformation, "status"
End If
End Sub
โพสต์นี้ได้รับคำขอบคุณจาก: aod