AJUDINHA NA TREEVIEWER

XXXANGELSXXX 06/04/2010 22:50:46
#338735
Pessoal, consegui fazer a treeviwer funcionar, agora to com uma duvida boba, como eu faço para deixar todos os nós da treviewer expandidos, ou seja, abertos, eu ja quero iniciar a mesma aberta, sempre, logico se clicar no no pai eles vao retrair, vou postar o print para verem, mais ou menos o que quero. ja tentei. .Nodes.Item.Expanded = True nao deu certo, da argumento nao opcional.
XXXANGELSXXX 07/04/2010 18:17:26
#338817
Algueeemm?? rs rs .
MICHAELL 10/04/2010 19:57:02
#339042
olá amigo..
voce deve criar um loop.. acessando todas as nodes...

Dim i As Integer
For i = 1 To TreeView1.Nodes.Count
TreeView1.Nodes(i).Checked = True
TreeView1.Nodes(i).Expanded = True
Next i
ANDRE.ADMVB 11/04/2010 14:25:40
#339061
Resposta escolhida
XXXANGELSXXX,

Você também pode evitar processamento desnecessário caso o nó já esteja expandido fazendo a verificação no IF:

For i = 1 To trv.Nodes.Count
If Not trv.Nodes(i).Expanded Then trv.Nodes(i).EnsureVisible
Next i


Eu usava este código num aplicativo e funcionava perfeitamente...

Obs: onde trv é o nome do seu Treeview
Tópico encerrado , respostas não são mais permitidas