Mega Code Archive

 

Categories / VB.Net / Data Types

 

String CompareOrdinal

Imports System Imports Microsoft.VisualBasic Class Sample    Public Shared Sub Main()       Dim str1 As [String] = "ABCD"       Dim str2 As [String] = "abcd"       Dim str As [String]       Dim result As Integer       result = [String].CompareOrdinal(str1, str2)       str = IIf(result < 0, "less than", IIf(result > 0, "greater than", "equal to"))       Console.Write("{0} ", str)    End Sub  End Class