Сортировка строк TextBox, содержащих числа - Visual Basic .NET
Формулировка задачи:
всем приветы.
в TextBox1 имею список который нужно отсортировать :
сейчас выполняю сортировку вот так:
в TextBox2 вывожу результат (который совсем не радует). результат таков:
а мне нужно его отсортировать чтобы получился "нормальный" список:
подскажите КАК получить "нормальный" список?
Спойлер
Листинг программы
- Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
- Dim lst As List(Of String) = New List(Of String)(TextBox1.Lines()) ' Создаем список из строк TextBox1
- lst.Sort(New Comparison(Of String)(AddressOf SortString)) ' Сортируем, используя делегат сравнения Comparison(Of T)
- TextBox2.Text = ""
- For i As Integer = 0 To lst.Count - 1
- TextBox2.Text &= String.Format("{0}{1}", lst(i), vbCrLf)
- Next i
- End Sub
- Function SortString(ByVal x As String, ByVal y As String) As Integer
- Return String.Compare(x, y) ' Сравнение строк
- End Function
Спойлер
Спойлер
Решение задачи: «Сортировка строк TextBox, содержащих числа»
textual
Листинг программы
- Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click
- Dim lst() As String = TextBox1.Lines()
- Dim nums() As Integer = (From num In lst Select CInt(num.Substring(1))).ToArray
- Array.Sort(nums, lst)
- TextBox2.Text = ""
- For i As Integer = 0 To lst.Count - 1
- TextBox2.Text &= String.Format("{0}{1}", lst(i), vbCrLf)
- Next i
- End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д