Как осуществить сортировку массива String - VB

Узнай цену своей работы

Формулировка задачи:

У меня есть массив слов (английских например,). Как сделать его сортировку по алфавиту. Читаю в Helpe, что есть такая функция Array.Sort(myString), но у меня VB показывает, что она задана с ошибкой. Кто подскажет, в чем здесь проблема.

Решение задачи: «Как осуществить сортировку массива String»

textual
Листинг программы
Public Function SSort(sArray As Variant, Optional bAcc As Boolean = True)
  Dim pass As Integer, i As Integer
  Dim hold As Variant
  
    For pass = 0 To UBound(sArray) - 1
      For i = (UBound(sArray) - 1) To pass Step -1
        If (bAcc And sArray(i) > sArray(i + 1)) Or _
         (Not bAcc And sArray(i) < sArray(i + 1)) Then
          hold = sArray(i)
          sArray(i) = sArray(i + 1)
          sArray(i + 1) = hold
        End If
      Next
    Next
  SSort = sArray
End Function

Оцени полезность:

9   голосов , оценка 3.889 из 5
Похожие ответы