Like, Compare, Ucase oder Lcase
08.03.2023 12:27:26
Antonio
nachdem Tipp von onur kann ich weiter schreiben,
mit diesem Code wird eine Listbox gefiltert:
Private Sub TextBox1_Change() 'Listbox1 filtern Dim zeile As Long Me.ListBox1.Clear Me.ListBox1.List = arrData For zeile = Me.ListBox1.ListCount - 1 To 0 Step -1 If Not Me.ListBox1.List(zeile, 0) Like Me.TextBox1 & "*" Then Me.ListBox1.RemoveItem (zeile) Next Label2 = ListBox1.ListCount & " Song gefunden " End Sub
Ich bin davon ausgegangen das "Like" an sich macht keine Unterschiede
ob in Textbox: buch, Buch, buCH oder BUch, steht, sollte egal sein, filtern sollte stattfinden.
Aber wenn ich, wie in der Listbox den Anfangbuchstabe groß schreibe, wierd gefiltert,
wenn ich klein screibe, der Listbox leert sich und nichts wird gefiltert.
Bin evtll. mit "Like" falsch?
Bitte um Hilfe.
Vielen Dank im Voraus
LG Antonio