Quantcast
Channel: VBForums - Visual Basic 6 and Earlier
Viewing all articles
Browse latest Browse all 21845

Calender with two digit Year

$
0
0
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

Viewing all articles
Browse latest Browse all 21845

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>