Advertisement
4_2005-2006 Math/ Dates #149937

Y2K Test for VB5 and 6

This program test the Visual Basic program you are currently running. As you will see.

AI

AI Summary: This codebase represents a historical implementation of the logic described in the metadata. Our preservation engine analyzes the structure to provide context for modern developers.

Source Code
original-source
Sub Form_Load()
Dim MyDate as Date
MyDate = "1/1/00" 'Or
'MyDate = "1/1/29" 'Returns 1/1/2029
'MyDate = "1/1/30" 'Returns 1/1/1930
'MyDate = "2/29/00" 'The Leap Year Date (Usually causes the most probs) 
MsgBox Format(MyDate, "mm/dd/yyyy")
End Sub
Original Comments (3)
Recovered from Wayback Machine