Optional の日付型の引数の初期値

Sub aaa( Optional ByVal aDateValue As Date = Date.MinValue)
とすると、
= Date.MinValue
の所で、定数式が必要ですというエラーがでました。
エラーの意味はわかるのですが、
では、Date.MinValueの部分をどう直せばいいのかわからず
行き詰ってしまいました

もしよろしければご教授いただけるとありがたいです
よろしくお願いします。

No.1 ベストアンサー 回答者： tom11 回答日時： 2010/01/05 13:35

ここ見ると

http://hpcgi1.nifty.com/MADIA/VBBBS2/wwwlng.cgi? …

Sub f(Optional ByVal d As Date = Nothing)

End Sub

でいいような、
これだと、エラーの波線は、出ないみたいですよ。

この回答へのお礼

ありがとうございます。
教えていただき、さらに調べてまで頂いて真に恐縮ですが、
Optional ByVal aDateValue As Date = #12:00:00 AM#
とする事で自己解決しました
どうもありがとうございました。

お礼日時：2010/01/05 15:43