Create the following interface by utilizing the simple concepts discussed by your instructor.
Graphical User Interface:
Source Code:
Graphical User Interface:
Source Code:
Private Sub cmdClose_Click()
If MsgBox("Are you sure you want to end this
program?", vbQuestion + vbYesNo, "Hello World Application") =
vbYes Then
End
End If
End Sub
Private Sub cmdPrint_Click()
If cmdPrint.Caption = "&Print" Then
txtPrint.Text =
"Hello World!"
cmdPrint.Caption = "&Clear"
Else
txtPrint.Text =
""
cmdPrint.Caption = "&Print"
End If
End Sub
Private Sub Form_Load()
'Setting off the form on the center of the monitor.
'Setting off the form on the center of the monitor.
Me.Top =
(Screen.Height - Me.Height) / 3
Me.Left =
(Screen.Width - Me.Width) / 2
End Sub
Download the Full Project by clicking here.
0 comments :
Post a Comment