Imports System.Collections Imports System.Collections.Generic Imports System.Globalization Module Example Public Sub Main() Dim strings() As String = { "a","B","c","D" } Dim ordinal(strings.Length - 1) As String strings.CopyTo(ordinal, 0) Array.Sort(ordinal, StringComparer.Ordinal) End Sub End Module