Alphabetical Sorting Of any String Using vb.net

 Function alphabetsorting(ByVal str As String) As String
        alphabetsorting = ""
        Dim arrayLetters As Array = str.ToCharArray()
        Array.Sort(arrayLetters)
        For i As Integer = 0 To arrayLetters.Length - 1
            If alphabetsorting = "" Then
                alphabetsorting = arrayLetters(i)
            Else
                alphabetsorting = alphabetsorting & arrayLetters(i)
            End If
        Next
        Return alphabetsorting
    End Function