タイトル | : 日付計算にて |
記事No | : 13981 |
投稿日 | : 2009/08/26(Wed) 16:39 |
投稿者 | : MOONEY |
こんいちわ。現在日付と基準日の日数差を表示したく 以下のような記述をしましたところ、Datediff関数のところで 「型が一致しません」というエラーが表示されます。 ヘルプ画面を見る限りは問題ないように思うのですが、どこに 問題があるのでしょうか。 VB6.0(SP4) WinXP(SP2)環境です。
Option Explicit
Const cstStdDate = "2008.04.01"
Sub main()
Dim strNowDate As String Dim varCmpDays As Variant strNowDate = Format(Now, "YYYY.MM.DD") varCmpDays = DateDiff("d", strNowDate, cstStdDate)
End Sub
|