Class Tester
Shared Sub Main( )
Dim s1 As [String] = "abcd"
Dim s2 As [String] = "ABCD"
Dim result As Integer
result = [String].Compare(s1, s2)
Console.WriteLine("compare s1: {0}, s2: {1}, result: {2}" _
& Environment.NewLine, s1, s2, result)
result = [String].Compare(s1, s2, True)
Console.WriteLine("Compare insensitive. result: {0}" _
& Environment.NewLine, result)
End Sub
End Class
|