VBA for Beginners: Programming Microsoft Access Projects Simplified | Step-by-Step Guide

แชร์
ฝัง
  • เผยแพร่เมื่อ 14 ม.ค. 2023
  • visit my website
    Close button code
    Dim aexit As VbMsgBoxResult
    On Error GoTo cmdexit_Click_Err
    aexit = MsgBox("Confirm if you want to exit", vbQuestion + vbYesNo, "INOVA BPO")
    If aexit = vbYes Then
    DoCmd.Close , ""
    End If
    cmdexit_Click_Exit:
    Exit Sub
    cmdexit_Click_Err:
    MsgBox Error$
    Resume cmdexit_Click_Exit

ความคิดเห็น • 11