表紙へ

VB6

日付が存在するか調べる

 


If IsDate("2001/2/29") Then
    MsgBox "この日付は存在します。"
Else
    MsgBox "この日付は存在しません。"
End If
 

この例では 2001/2/29 という日付が存在するか調べている。

2001はうるう年ではないので当然 2001/2/29 は存在しない。