ヘッダー
Visual Basic サンプル集
VB2005対応 VB2008対応 VB2010対応 VB2012対応 VB2013対応 VB2015対応 VB2017対応 VB2019対応

日付が存在するか調べる

2020/6/17

 

"2022/2/29" が存在するか調べる

VB.NET2002対応 VB.NET2003対応 VB2005対応 VB2008対応 VB2010対応 VB2012対応 VB2013対応 VB2015対応 VB2017対応 VB2019対応

If IsDate("2022/2/29") Then
    Debug.WriteLine("存在する日付です。")
Else
    Debug.WriteLine("存在しない日付です。") '←こちらが表示されます。
End If

Debug.WriteLineが表示される場所

 

"2021/7/31"が存在するなら日付型の値を取得する

VB2005対応 VB2008対応 VB2010対応 VB2012対応 VB2013対応 VB2015対応 VB2017対応 VB2019対応

Dim result As Date

If Date.TryParse("2021/7/31", result) Then
    Debug.WriteLine(result.ToString("yyyy\/MM\/dd") & " を取得しました。") '←こちらが表示されます。
Else
    Debug.WriteLine("存在しない日付です。")
End If

Debug.WriteLineが表示される場所