Feedback

VB - ListBox mit einzelnen Buchstaben durchsuchen

Veröffentlicht von am 22.02.2016
(0 Bewertungen)
Mit diesem Snippet kann man die Listbox durch einzelne Buchstaben durchsuchen. Zwar gibt es dir Möglichkeit die Listbox mit diesem Befehl zu Durchsuchen: Listbox.SelectedIndex = ListBox.FindString("Der Gesuchte text")

Jedoch durchsucht diese Funktion nur die Anfangsbuchstaben, mein snippet durchsucht jedoch alle Buchstaben.
Private Function SearchListbox(ByVal ListBox_ As ListBox, ByVal SearchString As String)
        Dim index As Integer = 0
        On Error Resume Next
        For Each tt In ListBox_.Items
            Dim p As String = tt
            Dim toLow = p.ToLower
            If toLow.Contains(SearchString.ToLower) = True Then
                ListBox_.SelectedIndex = index
            End If
            index += 1
        Next
    End Function

1 Kommentare zum Snippet

Anonymous2 schrieb am 23.02.2016:
Deinen Code sollte man mit dem Durchsuchen der Items von hinten implementieren mit einem Abbruch nach dem ersten Treffer.
 

Logge dich ein, um hier zu kommentieren!