фильтрация данных в раскрывающимся списке

Тема в разделе "Visual Basic", создана пользователем segail, 23 янв 2010.

  1. segail

    segail Гость

    Здравствуйте.
    Подскажите, как создать порядковую фильтрацию данных по именам (например камаз) в объекте раскрывающийся список, при выполнение команды ComboBox1_Change?
     

    Вложения:

    • spisok.rar
      Размер файла:
      11,4 КБ
      Просмотров:
      12
  2. alex77755

    alex77755 Well-Known Member

    Регистрация:
    15 фев 2009
    Сообщения:
    128
    Симпатии:
    0
    у комбобокса нет свойства сортировки. Я бы воспользовался вспомогательным контролом ListView. После каждого пополнения комбобокса скопировать данные в листвиев, а потом назад. Ну или загонять всё в массив и использовать алгоритм сортировки
    Код (Text):
    Private Sub CommandButton1_Click()
    Dim li As Long, bYes As Boolean: bYes = False
    With Me.TextBox1
    If .Value <> "" Then
    For li = 0 To Me.ComboBox1.ListCount - 1
    If Me.ComboBox1.List(li) = .Value Then bYes = True: Exit For
    Next li
    If bYes = False Then Me.ComboBox1.AddItem .Value: .Value = "" Else MsgBox "Введенное значение уже имеется в списке     ", 64, "Информационное сообщение"
    ComboBox1.Value = ""
    .Value = ""
    End If
    End With
    сортировка
    End Sub
    Private Sub сортировка()
    Dim i
    ListView1.ListItems.Clear
    For i = 0 To ComboBox1.ListCount - 1
    ListView1.ListItems.Add , , ComboBox1.List(i)
    Next i
    ComboBox1.Clear
    For i = 1 To ListView1.ListItems.Count
    ComboBox1.AddItem ListView1.ListItems(i)
    Next i
    End Sub
     
Загрузка...
Похожие Темы - фильтрация данных раскрывающимся
  1. vladis222
    Ответов:
    1
    Просмотров:
    2.129
  2. bobo
    Ответов:
    7
    Просмотров:
    3.750
  3. makaset
    Ответов:
    2
    Просмотров:
    2.548
  4. tatka95
    Ответов:
    0
    Просмотров:
    1.283
  5. akisawa
    Ответов:
    0
    Просмотров:
    1.337

Поделиться этой страницей