Отбор записей из текстового файла в combobx е - Visual Basic .NET

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

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

Доброго дня, всем привет. Заинтересовался темой: Отбор записей в listview Решил создать новую, и не задавать новых вопросов. пусть будет эта тема моя!) в краце, что я хочу узнать и понять как делать. 1. Есть текстовый файл вида: (взял наименования из прошлой темы) mizuno|43 asics|45 adidas|40 mizuno|41 mizuno|47 asics|40 mizuno|50 так вот. что я хочу получить: на форме в combobox1 вывести наименование (удалив повторяющие записи) то есть в combobox1 я должен получить: mizuno asics adidas При выборе записи в combobox1 в combobox2 отображать размеры по выбранной записи. то есть если я выбираю в combobox1 - mizuno то в combobox2 я должен получить: 43 41 47 50 Подскажите как это сделать? Спасибо.

Решение задачи: «Отбор записей из текстового файла в combobx е»

textual
Листинг программы
Private lst As Dictionary(Of String, String)
Private Sub Load_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click
    Dim ln() As String = IO.File.ReadAllLines("assortment.txt")
    lst = New Dictionary(Of String, String)
    Dim ss(1) As String
    For Each s As String In ln
        ss = s.Split("|"c)
        If lst.ContainsKey(ss(0)) Then
            lst.Item(ss(0)) &= ", " & ss(1)
        Else
            lst.Add(ss(0), ss(1))
        End If
    Next
    ListBox1.Items.AddRange(lst.Keys.ToArray)
    ListBox1.SelectedIndex = 0
End Sub
Private Sub ListBox1_SelectedIndexChanged(sender As System.Object, e As System.EventArgs) Handles ListBox1.SelectedIndexChanged
    Dim s As String = ""
    lst.TryGetValue(ListBox1.SelectedItem, s)
    TextBox1.Text = s
End Sub

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


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

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

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