Сортировка строкового массива по алфавиту в Visual Basic 2010

01.01.2001

Сортировка строкового массива по алфавиту в Visual Basic 2010
В одном листбоксе у меня заведены некоторые слова, которые необходимо отсортировать по алфавиту и отобразить во втором листбоксе. Имеется наработка:
Dim J, K As Byte, A(32), B(9), C(9) As String
J = 0
For I = 0 To 32
For K = 0 To 9
If A(I) = B(K).Substring(0, 1) Then ' Ссылка на объект не указывает на экземпляр объекта
C(J) = B(K)
J = J + 1
End If
Next K
Next I
ListBox2.Items.Add(C(K))
End Sub

В - Исходный строковый массив не упорядоченный, Сравниваю последовательно буквы алфавита с первыми символами слов, а потом присваиваю к С. и потом упорядочиваю
Пробовал по всякому, но отсортировать не получается. Подскажите как сделать. Заранее спасибо

  • В этом мире все гораздо проще, чем кажется.. . :)))
    Сортировать, это просто.
    Копировать еще проще, чем сортировать

  • Бейсик жив )

Вас заинтересует