日付型の初期化

解決


VB初心者  2003-06-24 04:10:17  No: 107599

日付型のデータの初期化はどうすればいいのでしょうか?
Dim wk_date As Date
Dim wk_Time As Date
wk_Date = CDate("00/00/00")
wk_Time = CDate("00:00:00")
とすると、時間の方は初期値になるのですが、
日付の方が、“型が一致しません。”というエラーになってしまいます。


たかみちえ  URL  2003-06-24 05:11:38  No: 107600

何を初期値とするんでしょうか?
そもそも、00年は1900年として、00月00日って、いつでしょうか?

  一応初期値といえるものはないわけではないですけど、日付と時刻を初期値にすることに意味はないと思います。


VB初心者  2003-06-25 00:50:01  No: 107601

日付型が未入力の時にデータとして“000000”を出力したいのですが


とろ  2003-06-25 02:08:42  No: 107602

データとして入ることがない日付で初期化しておけばよいのでは?
例えば西暦100年1月1日で。

wk_Date = CDate("100/01/01")
.....
If wk_Date = CDate("100/01/01") Then
    Print "000000"
Else
    Print Format(wk_Date, "yymmdd")
End If

という感じ。
wk_Date が Date 型である以上、日付として正しくない値
(0年0月0日というような値)は代入できませんよ。


VB初心者  2003-06-25 18:06:19  No: 107603

とろさん有難う御座いました。
教えていただいた方向でやってみようと思います。


※返信する前に利用規約をご確認ください。

※Google reCAPTCHA認証からCloudflare Turnstile認証へ変更しました。






  このエントリーをはてなブックマークに追加