Mega Code Archive

 
Categories / VB.Net Tutorial / Internationlization
 

Creates a CompareInfo that uses the InvariantCulture

Imports System Imports System.Globalization Public Class SamplesCompareInfo    Public Shared Sub Main()       Dim myStr1 As [String] = "Bill's"       Dim myStr2 As [String] = "bills"       Dim myComp As CompareInfo = CultureInfo.InvariantCulture.CompareInfo       Console.WriteLine("Comparing ""{0}"" and ""{1}""", myStr1, myStr2)       Console.WriteLine("   With no CompareOptions            : {0}", myComp.Compare(myStr1, myStr2))        End Sub End Class