Suchfunktion für mehrere Listboxen

  • VB

  • LÖWE20
  • 1212 Aufrufe 5 Antworten

Diese Seite verwendet Cookies. Durch die Nutzung unserer Seite erklären Sie sich damit einverstanden, dass wir Cookies setzen. Weitere Informationen

  • Suchfunktion für mehrere Listboxen

    Hallo,

    Mein Problem ist das ich wissen will wie man eine Suchfunktion Coded ich habe mehreres ausprobiert .. zudem soll in einer picturebox ein bild angezeigt werden wenn man auf einen spiezelen eintrag anklickt ich habe mir die arbeit gemacht und habe 100 pictureboxes erstellt und dort die entsprechenden bilder eingetragen ... screens :




    Achja wer vista buttons haben möchte kann sie auch gerne haben nur einen pn an mich ..


    Dies soll ein Pawno help program werden :)


    -CloseD -

  • Hi,

    ich hatte damals auch heftig an einem Code gebastelt der eine ListBox durchsucht. Bis ich das mal raus hatte vergingen Stunden. :D
    Du kannst dir den Code ja mal anschauen. Vielleicht hilft er dir ja weiter!

    ------------

    In meinem Fall wird in Text1 der Suchtext eingegeben.
    List1 ist die Liste die durchsucht wird und in List2 werden die Ergebnisse gepostet.

    Quellcode

    1. Private Sub Text1_KeyPress(KeyAscii As Integer)
    2. On Error Resume Next
    4. If KeyAscii = 13 Then
    6. If Text1.Text = "" Then
    7. MsgBox "Es wurde kein Titel angegeben.", vbCritical, "Fehler"
    8. Else
    9. List2.Clear
    10. For i = 0 To List1.ListCount - 1
    11. If InStr(LCase(List1.List(i)), LCase(Text1)) > 0 Then
    12. List2.AddItem List1.List(i)
    13. End If
    14. Next
    15. End If
    17. Text1.Text = ""
    18. KeyAscii = 0
    20. End If
    22. End Sub
    Alles anzeigen



    Und ein Bild in eine PictureBox zu laden ist einfach zu realisieren.

    Versuchs mal mit LoadPicture. ;)


    mfg,
    kewl
    [SIZE="1"]» Mark van Bommel: "Es gibt Hühnchenfell - oder wie heißt das? Gänsehaut?"[/SIZE]

  • Wieso einfach wenns auch kompliziert geht...

    was ist an meinem Vorschlag auszusetzen?? Mit der Funktion wird der String im gewünschtn controll gesucht. Ist der String vorhanden wird der index zurück gegeben sonst CB_ERR
    [SIZE="1"]i'm a signature virus. copy me into your signature to help me spread. - smart questions[/SIZE]

  • Es klappt danke :)


    Jetz habe ich noch 1 Frage :


    wie mach ich einen ascii editor

    also das man da text reinschreibt und zeichen schrift macht
    oder das man bilder in text konventiert

    wie soll ich das machen ?

    in eine richtextbox?