解决方案 »

  1.   

    string.Format("平成{0}年{1}月{2}日", date.Year - 1988, date.Month, date.Day)
      

  2.   

    Imports System.GlobalizationModule Module1    Sub Main()
            Dim jajp As New CultureInfo("ja-JP")
            jajp.DateTimeFormat.Calendar = New JapaneseCalendar()        Dim dt As New DateTime(2014, 11, 30)
            Debug.Print(dt.ToString("D", jajp))
        End SubEnd Module
    平成 26年11月30日