MS Access: VBA Yes/No message box

I needed to run an update query according to the requirement in an access vba module. That can be easily performed with this script.
Private Sub Command0_Click()

Dim Response As Integer

Response = MsgBox("Do you want to change the status of this client?", vbYesNo + vbQuestion, "Client Prompt")
If Response = vbYes Then
MsgBox "User Pressed 'YES' Button", vbOKOnly, "Confirmation..."
Else
Cancel = True
MsgBox "User Pressed 'NO' Button"
End If

End Sub

2 comments:

  1. The spacebar counter speed purely depends on your finger’s agility, which you can achieve with tons of consistent practice from scratch. Furthermore, hold down the space bar key with two or more fingers and try to generate a burst of spacebar hits through your whole hand instead of using just finger muscles.
    Space bar counter

    ReplyDelete
  2. This comment has been removed by the author.

    ReplyDelete