Сортировка двумерного массива - VB
Формулировка задачи:
Добрый день!
искала-искала, про двумерные массивы не нашла
может есть какой-то стандартный метод (типа sort) чтобы отсортировать двумерный массив, а ещё желательно сразу по двум столбцам???
очень надо, подскажите пожалуйста, кто знает!!!
Решение задачи: «Сортировка двумерного массива»
textual
Листинг программы
- Sub SortMultArr(ByRef mas(,) As String)
- Dim d() As String = Nothing
- Dim tmp() As String
- Dim L As ULong, M As ULong
- Dim i As ULong, j As ULong
- M = UBound(mas, 2)
- L = UBound(mas, 1)
- ReDim d(M)
- For j = 0 To M 'Склеиваем строки в промежуточный массив
- d(j) = mas(0, j)
- For i = 1 To L
- d(j) = d(j) & tmpDelimiter & mas(i, j)
- Next i
- Next j
- System.Array.Sort(d)
- For i = 0 To M 'Расщепляем строки обратно на записи
- tmp = Split(d(i), tmpDelimiter)
- If UBound(tmp) <> L Then 'немножко перестраховки на случай случайной встречи разделителя в тексте
- MsgBox("Ошибка сортировки. Несовпадение границ", vbCritical)
- Exit Sub
- End If
- For j = 0 To L
- mas(j, i) = tmp(j)
- Next
- Next i
- End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д