VB 日付範囲チェック

VBで日付の比較チェックをしたい
日付項目が2つあるとする
1年を越える日付が指定されましたらエラーを飛ばしたい
DateAdd ,diffなどを使ってやっているがうまくいきません
どうしたらいいですか？
おねがいします
2003/01～2003/12はok
2003/01～2004/01ならエラーを飛ばす
形式は"yyyy/mm"

No.1 ベストアンサー 回答者： n-jun 回答日時： 2009/03/13 07:48

年月しかないデータ同士で上手くいかないのなら、仮に年月１（2003/01/01や2004/04/01）と

日を与えてみてはどうでしょう？
⇒DateDiffで月数を出してみるとか？

ＶＢのどれの事なのかわからないので、あくまで憶測です。

No.2 回答者： yaguma 回答日時： 2009/03/13 21:05

基になる年月の１年後が、比較対象の年月より前か後かで判定するというのはどうでしょう。

'こんな感じ
日付A = "2003/01"
日付B = "2003/12"

If 日付A.AddYears(1) <= 日付B Then
　　'エラー
End If