作成者	カテゴリ	返答の対象		公開
TNP 06/30/1998 01:12 PM		EVALUATE関数について

Dim y as String

y = Cstr(Year(Today))

でいけますよ。
この場合は、年度が強制的に４桁になります。