VB.NETの西暦年に関して

質問

分からなくて困っています。どなたかご教授お願いいたします。m(_ _)m
■質問
年の部分を西暦年で表示したいのですが
なぜか、年の部分が西暦年ではなく平成年で処理されてしまいます。
Today ・　Now を使うと
例えば今日だと「14/09/15」となってしまいます。
で、Format関数を使って
Format(Today,"yyyy/MM/dd")とやってみたのですが
それでも「14/09/15」となってしまいます。
ちなみに、関係ないかもしれませんが
DateTimePickerもデフォルトで年が平成年表示なんです・・・
これってツールのなんかの設定の問題なのでしょうか・・・？
ネットで調べたら、Format関数でちゃんと西暦年４桁でみんなうまくいってるようなのですが、なぜか自分だけ・・・（涙）

なにかご存知の方はどうかお返事をお願いいたします。

回答No.2

mehiro2

私もVB.NETでよくわからない事ばかりあって困っています。
ご質問の件ですが私は、こう解決しました
dim str as string
dim genzai as date
str=Format(Now,"M/d/yyyy HH:mm:ss")
genzai=CDate(str)
上手くいかなければごめんなさい

お礼

お返事有難うございます。
結果は
CDate(str)のキャストでこけてしまいました・・・。

自分は最近、VB.NETのスタンダードを購入して
アップグレードウイザードがついてないので
自力でVB6のコードをVB.NETに変えてるのですが
データグリッドや印刷関連、ヘルプ表示など
かなり仕様が変わっているのでホントに困っています。
こうやってお返事をいただけれると救われます。

お返事、有難うございました。

回答No.1

imogasi

VB.netは判りませんが、ＶＢでは平成０２年０９月となりましたが。この辺は変わってないのでは。
Private Sub Form_Click()
a = Now()
Form1.Print Format(a, "gggyy年mm月")
End Sub
またはForm1.Print Format(a, "ggge年m月")

お礼

お返事有難うございます。
Format(Now,"gggyy年MM月")
で平成１４年９月と表示されました・・・。
平成１４年を2002年にしたかったのですが・・・。
とにかくお返事有難うございました。

あと、自己レスですが
地域オプションの日付が「和暦」になっていたため
NowやTodayで和暦の平成年になっていたようです。
また
DateTime.Now.Year.ToString
という記述で強制的に西暦年４桁を取得できました。

お返事有難うございました。