30. juli 2003 - 18:59Der er
2 kommentarer og 1 løsning
Listbox problemer
Kan nogen hjælpe hurtigt??
Jeg har en listbox (well en checkedlistbox) og et søgefelt (tekst). Når jeg skriver et bogstav "a" skal alle forekomster i listboxen, som ikke indeholder "a" slettes. Således at listboxen kun indeholder forekomster som starter med "a".
Jeg "napper" tastetrykkene og gemmer dem i en var. Derefter finder jeg længden på søgestrengen og skal så holde den op imod den forekomst i listboxen, som den nu er nået til. Men Hvordan??? Kan nogen hjælpe??
Min kode er således:
For i=0 to taeller streng=checkedlistbox1.?? 'her er jeg i problemer substring=Left(streng, laengde) if substring <> searchstring then checkedlistbox1.items.remove 'den er vist også gal i = i + 1 Endif Next
................... Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged Dim i As Integer = 0 Dim l As Integer Dim rep As Boolean = True
While i < chk.Items.Count If Not vb.Left(LCase(chk.Items.Item(i)), Len(TextBox1.Text)) = LCase(TextBox1.Text) Then chk.Items.RemoveAt(i) chk.Update() i = i - 1 End If i = i + 1 End While End Sub
Helt kanon. Det var lige det jeg skulle bruge!! Takker mange gange.
Systemnissen
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.