Form Design:
Form = 1
CommandButton = 4
Properties Set:
Object | Property | Settings |
Form1 | Caption Font Size Fore Height Width | Date & Time Project 14 &H000000C0& 7020 7005 |
Command1 | Caption | Date |
Command2 | Caption | Time |
Command3 | Caption | Clear |
Command4 | Caption | Exit |
Code:
Private Sub Command1_Click()
Print Date
End Sub
Private Sub Command2_Click()
Print Time
End Sub
Private Sub Command3_Click()
Cls
End Sub
Private Sub Command4_Click()
End
End Sub
0 Comments
Thank you for your Comment.