HI All
on my form load I have Label16.Caption = (Day(Now)) & "/" & (Month(Now)) & "/" & Format(Now(), "yy") which makes the year two digits I also have a command button the that
loads the Microsoft calendar Control 8 as a form3, when I select a date it changes the label16.caption to 4 digits so I tried change the line to read as below, which is the same in form load but when I select a date says "false" in label16 please could someone help where I gone wrong.
Private Sub Calendar1_Click()
Form1.Label16.Caption = (Day(Now)) & "/" & (Month(Now)) & "/" & Format(Now(), "yy") = Calendar1.Value
Unload Form3
End Sub
Kind Regards
Steve
on my form load I have Label16.Caption = (Day(Now)) & "/" & (Month(Now)) & "/" & Format(Now(), "yy") which makes the year two digits I also have a command button the that
loads the Microsoft calendar Control 8 as a form3, when I select a date it changes the label16.caption to 4 digits so I tried change the line to read as below, which is the same in form load but when I select a date says "false" in label16 please could someone help where I gone wrong.
Private Sub Calendar1_Click()
Form1.Label16.Caption = (Day(Now)) & "/" & (Month(Now)) & "/" & Format(Now(), "yy") = Calendar1.Value
Unload Form3
End Sub
Kind Regards
Steve