' Mr. Minich
' Period 1
' Ch1Demo6
' 9/14/2000
' Purpose - This program demonstrates the use of properties

Option Explicit

Private Sub Form_Activate()
   ' displays hello world message

   Dim strPhrase As String ' phrase to be displayed
   Dim strGreeting As String ' greeting to be displayed
   Dim strSpace As String ' blank space

   strGreeting = "hello"
   strPhrase = "world"
   strSpace = " "
   Form1.Print strGreeting & strSpace & strPhrase
End Sub