Advertisement
2002VB Math/ Dates #17441

Y2K Test for VB5 and 6

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

AI

Resumo por IA: 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.

Código fonte
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
Comentários originais (3)
Recuperado do Wayback Machine