本文整理匯總了VB.NET中System.Globalization.UmAlQuraCalendar.GetEra方法的典型用法代碼示例。如果您正苦於以下問題：VB.NET UmAlQuraCalendar.GetEra方法的具體用法？VB.NET UmAlQuraCalendar.GetEra怎麽用？VB.NET UmAlQuraCalendar.GetEra使用的例子？那麽, 這裏精選的方法代碼示例或許可以為您提供幫助。
在下文中一共展示了UmAlQuraCalendar.GetEra方法的1個代碼示例，這些例子默認根據受歡迎程度排序。您可以為喜歡或者感覺有用的代碼點讚，您的評價將有助於係統推薦出更棒的VB.NET代碼示例。
示例1: Example
' 導入命名空間
Imports System.Globalization
Module Example
Public Sub Main()
Dim date1 As Date = New Date(2011, 4, 3, New GregorianCalendar())
Dim cal As New UmAlQuraCalendar()
Console.WriteLine("{0:MMMM d, yyyy} in the Gregorian calendar is equivalent to:", date1)
DisplayCalendarInfo(cal, date1)
' Add 2 years and 10 months by calling UmAlQuraCalendar methods.
date1 = cal.AddYears(date1, 2)
date1 = cal.AddMonths(date1, 10)
Console.WriteLine("After adding 2 years and 10 months in the {0} calendar,",
GetCalendarName(cal))
Console.WriteLine("{0:MMMM d, yyyy} in the Gregorian calendar is equivalent to:", date1)
DisplayCalendarInfo(cal, date1)
End Sub
Private Sub DisplayCalendarInfo(cal As Calendar, date1 As Date)
Console.WriteLine(" Calendar: {0}", GetCalendarName(cal))
Console.WriteLine(" Era: {0}", cal.GetEra(date1))
Console.WriteLine(" Year: {0}", cal.GetYear(date1))
Console.WriteLine(" Month: {0}", cal.GetMonth(date1))
Console.WriteLine(" DayOfYear: {0}", cal.GetDayOfYear(date1))
Console.WriteLine(" DayOfMonth: {0}", cal.GetDayOfMonth(date1))
Console.WriteLine(" DayOfWeek: {0}", cal.GetDayOfWeek(date1))
Console.WriteLine()
End Sub
Private Function GetCalendarName(cal As Calendar) As String
Return cal.ToString().Replace("System.Globalization.", "").
Replace("Calendar", "")
End Function
End Module輸出：
April 3, 2011 in the Gregorian calendar is equivalent to: Calendar: UmAlQura Era: 1 Year: 1432 Month: 4 DayOfYear: 118 DayOfMonth: 29 DayOfWeek: Sunday After adding 2 years and 10 months in the UmAlQura calendar, January 1, 2014 in the Gregorian calendar is equivalent to: Calendar: UmAlQura Era: 1 Year: 1435 Month: 2 DayOfYear: 59 DayOfMonth: 29 DayOfWeek: Wednesday