• 締切済み

VB2008で和暦の表示について

VB2008で和暦を扱いたいときは、JapaneseCalendarクラスを使う方法以外に、VB6のときのように Format(Now, "ggg e年m月d日 aaaa") というようなFormat関数で簡単に書式設定する方法はないのでしょうか。

みんなの回答

回答No.1

CultureInfoクラス(System.Globalization名前空間)ではどうでしょうか? http://www.atmarkit.co.jp/fdotnet/dotnettips/034wareki/wareki.html

xiaolong_goo
質問者

お礼

お返事ありがとうございます。 結局、関数を作ってFormatするようにしました。 よく考えると、関数を1つ作っておくとよかったのでした^^;

関連するQ&A

  • 和暦が平成の次になったら…?

    VB6で、Format(Now, "ggg e年m月d日") などで和暦が取得できたかと思いますが、 平成が終わり新しい元号になった場合、VBランタイムを更新することになるのですか? それはVBソフトの開発者 や ソフト使用者が共にサービスパックのバージョン をあげなければならないですよね!? それとも、VBと言えど、OSの機能を使って和暦表示をしていて、Windows Updateで 最新の状態にあるパソコンを使っている限りは、他には更新する必要はないのでしょうか? (具体的に、どのモジュールが和暦を判定しているのか?を教えて頂ければ、すっきりする かも知れません)

  • VBの和暦について

    VBを和暦表示するにはFORMATでgとかeで指定すればいいのは分かるんですけど、 その逆に和暦から西暦に変換するにはどうすればいいですか? 分かる人がいたら教えてください。 しょぼい質問でごめんなさい

  • 和暦年が表示できない

    よろしくお願いします。 アクティブセルに和暦の年月日を表示したいのですが ユーザーフォームの TextBox2は2019(Format(Now, "e")で、和暦に変更後は1です  ) ComboBox25は6 ComboBox26は26 と入力されています。 TextBox2.Value = Format(Now, "ggge") ActiveCell.Value = TextBox2.Value & "/" & ComboBox25.Value & "/" & ComboBox26.Value 【 令和1/6/26 】と正しく表示されます。 下の構文を実行するとアクティブセルに  【 1/6/26 】と表示したいのですが【 2026/1/6 】と表示されます。 TextBox2.Value = Format(Now, "e") ActiveCell.Value = TextBox2.Value & "/" & ComboBox25.Value & "/" & ComboBox26.Value

  • VB.NETでの和暦表示

    VB.NETにて和暦表示を行いたいのですが、 「平成1年1月1日」はJapaneseCalenderクラスを用いてできましたが、 「H01.01.01」形式で表示する方法が分かりません。 年号の部分を「H」で表現したいのですが、 どうすればよいのでしょうか。 また、JapaneseCalenderクラスのGetEraですと、 現在使える年号がInteger型でしか取得できません。 「平成」「昭和」等、文字列で使える年号を取得するには どうしたらよいのでしょうか。

  • VB6でprintfのようなこと

    Cではよく、printf("%03d ", i); と書式設定すれば、気の利いたフォーマットで出力されますが、 VB6では、何か便利関数(サードパーティでも可)で同じことはできないでしょうか? またVB6で可変引数はできるのでしょうか?

  • 和暦、西暦の変換について(VBA)

    こんにちは、VBAで西暦年から和暦年への変換でエラーが出て原因がよく分かりません。 下のようにして、変換してやろうとしてもyear1,month1,day1の型が違いますとかのエラーが出て、変数の型をInteger、String、 Variantでとろうとしてもエラーばかりです、宜しくお願いします。 もっと簡単に出来る方法があると思うのですが、よく分かりません。 曜日まで「平成○年○月○日(木)」というような表示形式にしたいのです。 year1 = Year(Format(Calendar1_F.Value, "yyyy/m/d/(aaaa)")) month1 = Month(Format(Calendar1_F.Value, "yyyy/m/d/(aaaa)")) day1 = Day(Format(Calendar1_F.Value, "yyyy/m/d/(aaaa)")) youbi1 = Right(Format(Calendar1_F.Value, "yyyy/m/d/(aaaa)"), 4) - Right(Format(Calendar1_F.Value, "yyyy/m/d/(aaaa)"), 3) TextBox3.Value = "平成" + (year1 - 1988) + "年" + month1 + "月" + day1 + "日" + "(" + youbi1 + ")"

  • エクセルで和暦と西暦を同時に表示したい

    現在、日付データが入っているセルを和暦と西暦を同時表示させたいのですが、どのようにしたらよいでしょうか? 2007/6/1 と入っているセルを 平成19年(2007年)6月1日 と表示させたいのです。 書式設定-表示形式-ユーザー定義で元からあるのを利用して [$-411]ggge"年("yyyy"年)"m"月"d"日";@ とすると 平成19(19年)6月1日 となってしまいます。 試しにyyyyggge とすると 2007平成19 と西暦+和暦となるのですが、 gggeyyyy とすると 平成1919 と和暦+和暦になってしまいます。 [$-411]が肝なのかな?と思いますが、そこから先がわかりません。 バージョンはExcel2003です。 どうかご教示下さい。

  • VBのFORMAT関数

    VBのFORMAT関数についての質問です。 Format(変数,"!") "!"<--これの書式って どのような意味(書式)なんでしょうか? ランゲージレファレンスにも載っていませんでした。 よろしくお願いします

  • Access97での日付の書式

    Access97で作ったシステムをWindows2000のパソコン上で利用しています。その場合、日付の書式設定にggge"年"m"月"d"日"を設定すると和暦の"平成13年7月23日"とうまく表示されません。Windows98のパソコン上では表示ができます。過去の質問を拝見させて頂いて、【コントロールパネル】の【地域のオプション】の設定の影響かと思い、いろいろ試してみましたが、うまくいきません。とりあえず、format関数等を使わずに、書式で和暦"平成13年7月23日"と表示する方法がありましたら、教えてください。ちなみに、ggge"年"m"月"d"日"で設定をしてデータシートビューに切り替えると書式が勝手に次のように変更されてしまいます。→ ggge\m"月"\d"月" OSのバージョンによって異なるのでしょうか??よろしくお願いいたします。

  • 和暦にNOW関数で時間を表示したい

    Win2000XP EXCEL2003です。 NOW関数で時間を表示すると、西暦表示になります。 和暦表示で時間も表示する方法はありますか。 「平成18年9月12日 11時5分」 のように。