[VB 2008] Suchfunktion einbauen

09/19/2010 23:22 ☆lela☆#1

Heyho Leute
ich hab folgendes Anliegen :)
Ich hab ein Namensverzeichnis gebaut, welches 50 Datens�tze speichert, durch Arrys.
Nun will ich eine Suchfunktion der mir meine 50 Datens�tze nach z.B. namen, Alter, Geburtsjahr.... durchsucht. Vielleicht mit einem Structre...

Hier mal ein Screen wie es aktuell aussieht, nach bedarf lad ich den Sourcecode hoch :)
[Only registered and activated users can see links. Click Here To Register...]

So �hnlich hab ich mir die Suchfunktion vorgestellt :) Bitte um Hilfe
Mfg
Lela

09/19/2010 23:29 MoepMeep#2

Code:

for(i=0;i<50;i++)
{
    if(eingabe == name[i])
    {
          ausgabe();
    }
}

Kann kein VB, deshalb C-Code. Aber das umwandeln sollte ja kein Problem sein ;)

09/19/2010 23:58 ☆lela☆#3

Quote:
Originally Posted by MoepMeep
Code:
for(i=0;i<50;i++)
{
    if(eingabe == name[i])
    {
          ausgabe();
    }
}
Kann kein VB, deshalb C-Code. Aber das umwandeln sollte ja kein Problem sein ;)

f�r mich schon :)
danke trozdem :P

09/20/2010 21:19 Madd Eye#4

�bersetzung f�r VB

Code:

    Private Function search(ByVal arr As Array, ByVal keyword As String) As Integer
        For i As Integer = 0 To UBound(arr) Step 1
            If (arr(i) = keyword) Then
                Return i
                Exit Function
            End If
        Next i

        MsgBox("Keine Ergebnisse f�r den angegebenen Parameter gefunden!", MsgBoxStyle.Critical, "Fehler bei der Suche!")

    End Function

Gleich in ne Funktion gebracht ;)