Сортировка двумерного массива - VB

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

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

Добрый день! искала-искала, про двумерные массивы не нашла может есть какой-то стандартный метод (типа sort) чтобы отсортировать двумерный массив, а ещё желательно сразу по двум столбцам??? очень надо, подскажите пожалуйста, кто знает!!!

Решение задачи: «Сортировка двумерного массива»

textual
Листинг программы
  1.  Sub SortMultArr(ByRef mas(,) As String)
  2.         Dim d() As String = Nothing
  3.         Dim tmp() As String
  4.         Dim L As ULong, M As ULong
  5.         Dim i As ULong, j As ULong
  6.  
  7.         M = UBound(mas, 2)
  8.         L = UBound(mas, 1)
  9.         ReDim d(M)
  10.         For j = 0 To M 'Склеиваем строки в промежуточный массив
  11.             d(j) = mas(0, j)
  12.             For i = 1 To L
  13.                 d(j) = d(j) & tmpDelimiter & mas(i, j)
  14.             Next i
  15.         Next j
  16.         System.Array.Sort(d)
  17.  
  18.         For i = 0 To M 'Расщепляем строки обратно на записи
  19.             tmp = Split(d(i), tmpDelimiter)
  20.             If UBound(tmp) <> L Then 'немножко перестраховки на случай случайной встречи разделителя в тексте
  21.                 MsgBox("Ошибка сортировки. Несовпадение границ", vbCritical)
  22.                 Exit Sub
  23.             End If
  24.             For j = 0 To L
  25.                 mas(j, i) = tmp(j)
  26.             Next
  27.         Next i
  28.     End Sub

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

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

5   голосов , оценка 4.2 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут
Похожие ответы