システム日付の表示方法

ＶＢ６．０でシステム日付をテキストボックスに"XXXX年XX月XX日"の形で表示したいのですが、どうしたらいいのでしょうか？

テキストボックスのオプションでDataFomatを上記の設定にしてのですが、プログラムよりシステム日付を取得すると、2004/10/26と表示されてしまいます。
取得の仕方がおかしいのでしょうか？

初歩的で申し訳ありませんがよろしくお願いします。

No.1 ベストアンサー 回答者： kachimi 回答日時： 2004/10/26 15:34

text1.text = format(now(),"yyyy年mm月dd日")

で出来ます。

この回答へのお礼

ありがとうございました。
上記の記述でうまく表示されました。

お礼日時：2004/10/27 10:34

No.2 回答者： imogasi 回答日時： 2004/10/26 16:03

Private Sub Form_Load()

Text1.Text = Format(Date, "gggee年mm月dd日")
End Sub
で
平成16年10月26日になりました。””の中を色々変えると
表現できます。

この回答へのお礼

回答ありがとうございました。
上記の記述で表示されました。

お礼日時：2004/10/27 10:37