日付をDate型のフィールドに入力するには

質問

例えば"1月 8日 22時 41分"という日付(文字列)をaccessのDate型のフィールドに"2007/1/8 22:41:00"と入力したいです。
どうやるのが一番良いでしょうか。

回答No.1

AlexSuns · ベストアンサー

VBAであれば、
Dim strDate As String
Dim dteDate As Date

strDate = "1月 8日 22時 41分"
dteDate = CDate(strDate)

MsgBox Format(dteDate, "yyyy/mm/dd hh:nn:ss")
(※「accessのDate型のフィールド」に代入するときは、上記の変換された値をInsert/Update文とかで代入して下さい)

連結コントロールであれば、
対象となるテキストボックスの書式設定に「m月 d日 h時 n分」と設定する
(※この設定をされたテキストボックスで日付を入力するときは、「1/8 22:41」となる)

お礼

ありがとうございます。
助かりました。