Tema: treeview
Ver Mensaje Individual
  #1 (permalink)  
Antiguo 05/06/2009, 15:49
Avatar de fonchi
fonchi
 
Fecha de Ingreso: septiembre-2006
Ubicación: Concepción
Mensajes: 170
Antigüedad: 17 años, 7 meses
Puntos: 0
Pregunta treeview

Hola amigos:

Nuevamente por acá, les cuento. Estoy trabajando por vez primera con un treeview y no se mucho de el.
Este debiera tener la sgte estructura:

+Administración
|........................L .Cabiar Clave Adm.
|........................L .Cambiar Clave User.
|
+Menu (Para navegar a través de la aplcación)
..........L .Form1
..........L .Form2
..........L .Form3

Lo ideal es que me lo muestre así...Pero la realidad es esta:

|-Administración
|-Cabiar Clave Adm.
|-Cambiar Clave User.
|-Menu (Para navegar a través de la aplcación)
|-Form1
|-Form2
|-Form3


La idea tambien es que salga, la opcion para expandir o no el arbol.
Esto es lo que tengo en el Load del Formulario:


Private Sub Form_Load()
Me.Administrador.Visible = False
Me.Usuario.Visible = False
Me.MSHFlexGrid1.Visible = False
Dim nodx As Node
'...Creo Nodo Padre y sus Hijos/No Sé
Set nodx = TreeView1.Nodes.Add(, , "o", "Administración")
Set nodx = TreeView1.Nodes.Add("o", , "u", "Cambiar Clave Usuario")
Set nodx = TreeView1.Nodes.Add("o", , "a", "Cambiar Clave Administrador")
Set nodx = TreeView1.Nodes.Add(, , "M", "Menú")
Set nodx = TreeView1.Nodes.Add("M", , "Us", "Usuarios")
Set nodx = TreeView1.Nodes.Add("M", , "Lis", "Listar")
End Sub

Ya he Buscado si sale algo en las FAQ's y no encontre nada. Espero su ayuda.
Gracias, Salu2.