Function aufrufen, was für ein Wert muss ich angeben

03/07/2009 - 08:24 von Leuenberger Christian | Report spam
Guten Tag
ich möchte diese Function aufrufen,
habe aber nicht herausgefunden was ich als StartNode eingeben muss.

Der Name des TreeView ist > TreeView_Team <

Function TvwOpenTreeFull(StartNode As Node)
Dim nChildNode As Node

StartNode.Expanded = True
Set nChildNode = StartNode.Child
Do While Not (nChildNode Is Nothing)
TvwOpenTreeFull nChildNode
Set nChildNode = nChildNode.Next
Loop
End Function

Arbeite mit Access XP

Gruss
Christian
 

Lesen sie die antworten

#1 Jens Schilling
03/07/2009 - 08:41 | Warnen spam
Hallo, Christian

Leuenberger Christian wrote:
ich möchte diese Function aufrufen,
habe aber nicht herausgefunden was ich als StartNode eingeben muss.

Der Name des TreeView ist > TreeView_Team <

Function TvwOpenTreeFull(StartNode As Node)
Dim nChildNode As Node

StartNode.Expanded = True
Set nChildNode = StartNode.Child
Do While Not (nChildNode Is Nothing)
TvwOpenTreeFull nChildNode
Set nChildNode = nChildNode.Next
Loop
End Function



Wenn ich Deine Frage im Bezug auf Deine gestrige Frage sehen kann, dann
könntest Du es mit "SelectedItem" versuchen:

TvwOpenTreeFull(TreeView_Team.SelectedItem)

Gruss
Jens

Ähnliche fragen