1
ห้อง MS Access / ปุ่ม command โต้ตอบ บันทึกเอกสารหรือไม่
« เมื่อ: 16 ม.ค. 65 , 10:16:23 »
Private Sub Command64_Click()
On Error GoTo Err_Command64_Click
DoCmd.GoToRecord , , acNewRec
Exit_Command64_Click:
Exit Sub
Err_Command64_Click:
'MsgBox Err.Description
'Resume Exit_Command64_Click
'DoCmd.GoToRecord , , acNewRec
End Sub
****************
เจตนาว่าเมื่อป้อนข้อมูลแล้ว กดปุ่มบันทึก มีข้อความ "ต้องการบันทึกหรือไม่ Y/N" ถ้า Y ขึ้นหน้าใหม่ ถ้า N ออกจากงานบันทึกนี้
เมื่อทำตามนี้แล้ว มันวนไปวนมา ไม่ยอมเลิก หรือ ไม่ยอมขึ้นรายการใหม่
On Error GoTo Err_Command64_Click
DoCmd.GoToRecord , , acNewRec
Exit_Command64_Click:
Exit Sub
Err_Command64_Click:
'MsgBox Err.Description
'Resume Exit_Command64_Click
'DoCmd.GoToRecord , , acNewRec
End Sub
****************
เจตนาว่าเมื่อป้อนข้อมูลแล้ว กดปุ่มบันทึก มีข้อความ "ต้องการบันทึกหรือไม่ Y/N" ถ้า Y ขึ้นหน้าใหม่ ถ้า N ออกจากงานบันทึกนี้
เมื่อทำตามนี้แล้ว มันวนไปวนมา ไม่ยอมเลิก หรือ ไม่ยอมขึ้นรายการใหม่