Hello World Application: VB6 Source Code

Create the following interface by utilizing the simple concepts discussed by your instructor.

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.

    Me.Top = (Screen.Height - Me.Height) / 3

    Me.Left = (Screen.Width - Me.Width) / 2

End Sub

Download the Full Project by clicking here.

Read More