Imports System
Imports System.Globalization
Public Class SamplesRegionInfo
Public Shared Sub Main()
Dim myRI1 As New RegionInfo("US")
Dim myRI2 As New RegionInfo(New CultureInfo("en-US", False).LCID)
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 'Main
End Class