Date & Time Project By Using Label

Date & Time Project By Using Label

Form Design:

Form = 1

Command Button = 4

Label = 2

Properties Set:

Object	Property	Settings
Form1	Caption Height Width	Date & Time Project by Text Box 4875 6060
Command1	Caption	Date
Command2	Caption	Time
Command3	Caption	Clear
Command4	Caption	Exit
Label 1	Alignment Caption Font Style Font Size Fore Color Height Width Left Top	2 - Center  [blank] Bold 14 &H000000FF& 615 2535 3240 600
Label 2	Alignment Caption Font Style Font Size Fore Color Height Width Left Top	2 - Center  [blank] Bold 14 &H000000FF& 615 2535 3240 2040

Code:

Private Sub Command1_Click()

Label1.Caption = Date

End Sub

Private Sub Command2_Click()

Label2.Caption = Time

End Sub

Private Sub Command3_Click()

Label1.Caption = ""

Label2.Caption = ""

End Sub

Private Sub Command4_Click()

End

End Sub

Date & Time Project By Using Label

Date & Time Project By Using Label

Date & Time Project By Using Label

Date & Time Project By Using Label