I am working on an assignment that requires a procedure to ask the user when clicking the command button - if he really wants to quit.
I am able to do the if then work but having no help file I cannot find the command to give when they really want to quit the program. (I realize that "end" works with the exit button.
This is what I have:
Dim Response As String
Option Explicit
Private Sub cmdExit_Click()
End
End Sub
Private Sub cmdQuit_Click()
'confirm quitting program
picBox.Cls
Response = Val(InputBox("Are you sure you want to quit " & _
"this program (Y/N)?"))
If (UCase(Response)) = "N" Then
picBox.Print "Program returned."
If (UCase(Response)) = "Y" Then
End
Else
End If
End If
End Sub
of course - it isn't working I need help.




Reply With Quote