Imports System.Diagnostics
Imports System.Globalization
Imports GrapeCity.Web.Input.Core
' 日本語(日本)のカルチャを生成します。
Dim ci As CultureInfo = New CultureInfo("ja-JP", False)
' 生成したカルチャの元号リストを取得します。
Dim eraNames() As String = DateTimeEx.GetEraNames(ci)
' 取得したリストを確認します。
Dim i As integer
for i = 0 To eraNames.Length - 1
Debug.WriteLine(eraNames(i))
Next i
using System.Diagnostics;
using System.Globalization;
using GrapeCity.Web.Input.Core;
// 日本語(日本)のカルチャを生成します。
CultureInfo ci = new CultureInfo("ja-JP", false);
// 生成したカルチャの元号リストを取得します。
string[] eraNames = DateTimeEx.GetEraNames(ci);
// 取得したリストを確認します。
for (int i=0;i < eraNames.Length;i++)
{
Debug.WriteLine(eraNames[i]);
}