タイトル : 日付計算にて 投稿日 : 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 |