本文整理匯總了VB.NET中System.Globalization.DateTimeFormatInfo.NativeCalendarName屬性的典型用法代碼示例。如果您正苦於以下問題：VB.NET DateTimeFormatInfo.NativeCalendarName屬性的具體用法？VB.NET DateTimeFormatInfo.NativeCalendarName怎麽用？VB.NET DateTimeFormatInfo.NativeCalendarName使用的例子？那麽, 這裏精選的屬性代碼示例或許可以為您提供幫助。您也可以進一步了解該屬性所在類System.Globalization.DateTimeFormatInfo的用法示例。
在下文中一共展示了DateTimeFormatInfo.NativeCalendarName屬性的1個代碼示例，這些例子默認根據受歡迎程度排序。您可以為喜歡或者感覺有用的代碼點讚，您的評價將有助於係統推薦出更棒的VB.NET代碼示例。
示例1: Sample
' This code example demonstrates the DateTimeFormatInfo
' MonthGenitiveNames, AbbreviatedMonthGenitiveNames,
' ShortestDayNames, and NativeCalendarName properties, and
' the GetShortestDayName() and SetAllDateTimePatterns() methods.
Imports System.Globalization
Class Sample
Public Shared Sub Main()
Dim myDateTimePatterns() As String = {"MM/dd/yy", "MM/dd/yyyy"}
Dim name As String = ""
' Get the en-US culture.
Dim ci As New CultureInfo("en-US")
' Get the DateTimeFormatInfo for the en-US culture.
Dim dtfi As DateTimeFormatInfo = ci.DateTimeFormat
' Display the effective culture.
Console.WriteLine("This code example uses the {0} culture.", ci.Name)
' Display the native calendar name.
Console.WriteLine(vbCrLf & "NativeCalendarName...")
Console.WriteLine("""{0}""", dtfi.NativeCalendarName)
' Display month genitive names.
Console.WriteLine(vbCrLf & "MonthGenitiveNames...")
For Each name In dtfi.MonthGenitiveNames
Console.WriteLine("""{0}""", name)
Next name
' Display abbreviated month genitive names.
Console.WriteLine(vbCrLf & "AbbreviatedMonthGenitiveNames...")
For Each name In dtfi.AbbreviatedMonthGenitiveNames
Console.WriteLine("""{0}""", name)
Next name
' Display shortest day names.
Console.WriteLine(vbCrLf & "ShortestDayNames...")
For Each name In dtfi.ShortestDayNames
Console.WriteLine("""{0}""", name)
Next name
' Display shortest day name for a particular day of the week.
Console.WriteLine(vbCrLf & "GetShortestDayName(DayOfWeek.Sunday)...")
Console.WriteLine("""{0}""", dtfi.GetShortestDayName(DayOfWeek.Sunday))
' Display the initial DateTime format patterns for the 'd' format specifier.
Console.WriteLine(vbCrLf & "Initial DateTime format patterns for " & _
"the 'd' format specifier...")
For Each name In dtfi.GetAllDateTimePatterns("d"c)
Console.WriteLine("""{0}""", name)
Next name
' Change the initial DateTime format patterns for the 'd' DateTime format specifier.
Console.WriteLine(vbCrLf & "Change the initial DateTime format patterns for the " & _
vbCrLf & "'d' format specifier to my format patterns...")
dtfi.SetAllDateTimePatterns(myDateTimePatterns, "d"c)
' Display the new DateTime format patterns for the 'd' format specifier.
Console.WriteLine(vbCrLf & _
"New DateTime format patterns for the 'd' format specifier...")
For Each name In dtfi.GetAllDateTimePatterns("d"c)
Console.WriteLine("""{0}""", name)
Next name
End Sub
End Class輸出：
This code example uses the en-US culture. NativeCalendarName... "Gregorian Calendar" MonthGenitiveNames... "January" "February" "March" "April" "May" "June" "July" "August" "September" "October" "November" "December" "" AbbreviatedMonthGenitiveNames... "Jan" "Feb" "Mar" "Apr" "May" "Jun" "Jul" "Aug" "Sep" "Oct" "Nov" "Dec" "" ShortestDayNames... "Su" "Mo" "Tu" "We" "Th" "Fr" "Sa" GetShortestDayName(DayOfWeek.Sunday)... "Su" Initial DateTime format patterns for the 'd' format specifier... "M/d/yyyy" "M/d/yy" "MM/dd/yy" "MM/dd/yyyy" "yy/MM/dd" "yyyy-MM-dd" "dd-MMM-yy" Change the initial DateTime format patterns for the d' format specifier to my format patterns... New DateTime format patterns for the 'd' format specifier... "MM/dd/yy" "MM/dd/yyyy"