Y2K Test for VB5 and 6
This program test the Visual Basic program you are currently running. As you will see.
AI
AI 摘要: 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.
源代码
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
原始评论 (3)
从 Wayback Machine 恢复