投稿者 YUU  (社会人) 投稿日時 2015/11/24 17:49:14
        '現在入力チェック用のプログラムを作成しております。
        'DBから取得した生年月日(YYYY/MM/DD)を年号省略状態でフォーム上に表示する必要があり困っております。
        '下記はイメージ

        Dim cultureInfo As DateTimeFormatInfo = New CultureInfo("ja-JP").DateTimeFormat
        cultureInfo.Calendar() = New JapaneseCalendar()
        Console.WriteLine(Date.Now.ToString("ggyy年MM月dd日", cultureInfo))
        '平成27年11月24日

        '現在は下記の手法で取得し変換しております。
    変換したいデータ 例:H27/11/24
        'これだとなんだか微妙・・・
        Dim aaa As New JapaneseCalendar

        Console.WriteLine(aaa.GetYear(Date.Now))
        Console.WriteLine(aaa.GetEra(Date.Now))
        '1:明治(M)、2:大正(T)、3:昭和(S)、4:平成(H)


        'テキストボックスに入力された日付の整合性をチェックしたいのが目的です。
        'DateTime.Parseでチェックはできるようですが・・・。
        '上記の手法で変換は可能かと思われますがその他の手法はございますでしょうか。