学步园

Private Sub cmdExit_Click()
    If MsgBox("Are you sure?", vbYesNo, "Exiting the application") = vbYes Then
        Unload Me
    End If
End Sub