SCREENSHOT |
CODE
Private Sub cmdClear_Click()
txtShow.Text = ""
End Sub
Private Sub cmdExit_Click()
If MsgBox("Are you sure you want to close the application?", vbQuestion + vbYesNo, "Confirm") = vbYes Then
End
Else
cmdShow.SetFocus
End If
End Sub
Private Sub cmdShow_Click()
txtShow.Text = "Hello World!"
End Sub
No comments :
Post a Comment