ich habe ein 3-stufiges TreeView aufgebaut und möchte jetzt einen bestimmten
Eintrag in einer Stufe suchen und bei Erfolg anzeigen (markieren) lassen.
Da ich jedoch Frischling bin habe ich keine Ahnung wie ( TreeView war schon
schwer genug für mich ! ) das funktionieren könnte ?!?
mfg
Holger
Folgendes hat M. Schiffer letztlich in der VB-Gruppe gepostet.
Sollte jedenfalls als Einstieg für Dich geeignet sein, musst im Prinzip nur
noch als Funktion deklarieren, vergleichen und bei Fund abbrechen:
' ---
Private Sub ListSubNodeKeys(ByVal Node As MSComctlLib.Node)
Dim Child As MSComctlLib.Node
If Node.Children = 0 Then Exit Sub ' <- Rekursionsabbruch
Set Child = Node.Child ' Erstes Child
Do
Debug.Print Child.Key ' <- Oder was auch immer
If Child.Children > 0 Then ListSubNodeKeys Child ' <- Rekursion
Set Child = Child.Next ' Naechstes Child
Loop Until Child Is Nothing ' Keine weiteren Children mehr
End Sub
' ---
Bis dann,
Olaf