昨年の翌月の日付と比較しようとしています。date1からの日付が昨年からの翌月の1日よりも小さい場合は、trueを返します。日付を1年先に設定した場合にのみ、条件が失敗するようです。
LastRightToKnow = 7/14/2011
Dim RTK As String
RTK = ""
If [NeedsRightToKnow] = -1 And [LastRightToKnow] < DateSerial(Year(Now() - 1), Month(Now() + 1), 1) Then
RTK = "Right-To-Know"
End If
だから、私の理解から、私はそれを収集しtoday = 6/14/2012
ます
DateSerial(Year(Now() - 1), Month(Now() + 1), 1) = 7/01/2011
LastRightToKnow = 7/14/2011
したがって、7/14/2011 < 7/01/2011
を返す必要がありFalse
ます。しかしそれは戻りますtrue
...私は何が欠けていますか?