本文整理汇总了VB.NET中System.Globalization.RegionInfo.RegionInfo构造函数的典型用法代码示例。如果您正苦于以下问题：VB.NET RegionInfo构造函数的具体用法？VB.NET RegionInfo怎么用？VB.NET RegionInfo使用的例子？那么, 这里精选的构造函数代码示例或许可以为您提供帮助。您也可以进一步了解该构造函数所在类System.Globalization.RegionInfo的用法示例。
在下文中一共展示了RegionInfo构造函数的2个代码示例，这些例子默认根据受欢迎程度排序。您可以为喜欢或者感觉有用的代码点赞，您的评价将有助于系统推荐出更棒的VB.NET代码示例。
示例1: Main
' 导入命名空间
Imports System.Globalization
Public Class SamplesRegionInfo
Public Shared Sub Main()
' Creates a RegionInfo using the ISO 3166 two-letter code.
Dim myRI1 As New RegionInfo("US")
' Creates a RegionInfo using a CultureInfo.LCID.
Dim myRI2 As New RegionInfo(New CultureInfo("en-US", False).LCID)
' Compares the two instances.
If myRI1.Equals(myRI2) Then
Console.WriteLine("The two RegionInfo instances are equal.")
Else
Console.WriteLine("The two RegionInfo instances are NOT equal.")
End If
End Sub
End Class输出：
The two RegionInfo instances are equal.
示例2: SamplesRegionInfo
' 导入命名空间
Imports System.Globalization
Public Class SamplesRegionInfo
Public Shared Sub Main()
' Creates an array containing culture names.
Dim myCultures() As String = {"", "ar", "ar-DZ", "en", "en-US"}
Dim culture As String
' Creates a RegionInfo for each of the culture names.
' Note that "ar" is the culture name for the neutral culture "Arabic",
' but it is also the region name for the country/region "Argentina";
' therefore, it does not fail as expected.
Console.WriteLine("Without checks...")
For Each culture In myCultures
Try
Dim myRI As New RegionInfo(culture)
Catch e As ArgumentException
Console.WriteLine(e.ToString())
End Try
Next
Console.WriteLine()
Console.WriteLine("Checking the culture names first...")
For Each culture In myCultures
If culture = "" Then
Console.WriteLine("The culture is the invariant culture.")
Else
Dim myCI As New CultureInfo(culture, False)
If myCI.IsNeutralCulture Then
Console.WriteLine("The culture {0} is a neutral culture.", culture)
Else
Console.WriteLine("The culture {0} is a specific culture.", culture)
Try
Dim myRI As New RegionInfo(culture)
Catch e As ArgumentException
Console.WriteLine(e.ToString())
End Try
End If
End If
Next
End Sub
End Class输出：
Without checks... System.ArgumentException: Region name '' is not supported. Parameter name: name at System.Globalization.RegionInfo..ctor(String name) at SamplesRegionInfo.Main() System.ArgumentException: Region name 'en' is not supported. Parameter name: name at System.Globalization.CultureTableRecord..ctor(String regionName, Boolean useUserOverride) at System.Globalization.RegionInfo..ctor(String name) at SamplesRegionInfo.Main() Checking the culture names first... The culture is the invariant culture. The culture ar is a neutral culture. The culture ar-DZ is a specific culture. The culture en is a neutral culture. The culture en-US is a specific culture.