日付を数値化して、年だけ取り出してみると、 結果がおかしいことになったんですが…。

A=とするとA#として代入されるので、STR$したとき2.01604e+07になっていますので、 A%=というふうに整数と明記すれば出来ました。

ワンステップづつ確認してみて何処でおかしくなるかのデバックの仕方を覚えた方が良いですよ。 何処まで期待通りか、何処から期待外れとなるかの問題の切り分けは重要です。 プログラムとしては正しく動いている様です。

画像つけわすれた^^;