Date Project

Form Design:

Form = 1

CommandButton = 3

Properties Set:

Object	Property	Settings
Form1	Caption Font Size Fore Color Height Width	Date Project 14 &H000000C0& 7020 5820
Command1	Caption	Date
Command2	Caption	Clear
Command3	Caption	Exit

Code:

Private Sub Command1_Click()

Print Date

End Sub

Private Sub Command2_Click()

Cls

End Sub

Private Sub Command3_Click()

End

End Sub