■ 構文
IsDate(expression)
■ 引数
expression :(必須) 日付式または文字列式のバリアント型 を指定します。
■ 戻り値
結果はブール型 (Boolean) で返ります。
日付の場合は真(True)、それ以外は偽(False)が返ります。
■ Access実行画面
「チェックするデータ」に判定するデータを入力し、「日付かどうか確認」ボタンをクリックすると結果が表示されます。
[日付の場合の結果]
[日付でない場合の結果]
■ Access VBA 実行コード
Option Compare Database
Private Sub コマンド2_Click()
If IsNull(Me!テキスト0) Then
MsgBox "チェックするデータを入力してください。"
Exit Sub
End If
'チェック
If IsDate(Me!テキスト0) Then
Me!テキスト3 = "日付です"
Else
Me!テキスト3 = "日付ではありません"
End If
End Sub