Autor
|
Tema: Problema con treeview (Leído 1,689 veces)
|
SheKeL_C$
Desconectado
Mensajes: 549
_-=[Sh3K3L_C$]=-_
|
M es imposible pensar/realizar un programa en el q yo l pase una ruta y el treeview me cree unos sub-nodos. Yo x ejemplo le paso una ruta en este formato "\carpeta\subcarpeta\y otra mas" y no se como acer para q m salga asi:
\ |---carpeta |-----subcarpeta |--------y otra mas
Alguien m podria poner un ejemplo?
|
|
|
En línea
|
|
|
|
d(-_-)b
|
Hola esto te puede servir Private Sub Form_Load()
With TreeView1.Nodes
Set Root = .Add(, , , "Nombre") .Add Root.Index, tvwChild, , "alejandro" .Add Root.Index, tvwChild, , "alex" .Add Root.Index, tvwChild, , "raul" .Add Root.Index, tvwChild, , "carlos" .Add Root.Index, tvwChild, , "maria" .Add Root.Index, tvwChild, , "daniel" Set Root = .Add(, , , "Coches") .Add Root.Index, tvwChild, , "mercedez" .Add Root.Index, tvwChild, , "bmw" .Add Root.Index, tvwChild, , "honda" .Add Root.Index, tvwChild, , "renault" .Add Root.Index, tvwChild, , "opel" Set Root = .Add(, , , "Pais") .Add Root.Index, tvwChild, , "españa" .Add Root.Index, tvwChild, , "alemania" .Add Root.Index, tvwChild, , "francia" .Add Root.Index, tvwChild, , "miami" .Add Root.Index, tvwChild, , "ondura" Set Root = .Add(, , , "Comer") .Add Root.Index, tvwChild, , "vaca" .Add Root.Index, tvwChild, , "pollo" .Add Root.Index, tvwChild, , "pescado" Set Root = .Add(, , , "Trabajo") .Add Root.Index, tvwChild, , "construccion" .Add Root.Index, tvwChild, , "soldador" .Add Root.Index, tvwChild, , "carpintero" End With
End Sub ok espero que te sirva esto,
|
|
|
En línea
|
Max 400; caracteres restantes: 366
|
|
|
SheKeL_C$
Desconectado
Mensajes: 549
_-=[Sh3K3L_C$]=-_
|
Lo q mejor m a funcionado es_ Public Sub AddFolder(Direccion As String, Tree As TreeView) On Local Error Resume Next Dim Separa() As String Dim i As Integer Dim Ruta As String Dim Titulo As String Separa = Split(Direccion, "\") For i = 0 To UBound(Separa) - 1 If i = 0 Then Ruta = "\" Else Ruta = Separa(i) Titulo = Separa(i + 1) Tree.Nodes.Add Ruta, 4, Titulo, Titulo Next i End Sub
|
|
|
En línea
|
|
|
|
d(-_-)b
|
Bien no esta mal...
|
|
|
En línea
|
Max 400; caracteres restantes: 366
|
|
|
|
Mensajes similares |
|
Asunto |
Iniciado por |
Respuestas |
Vistas |
Último mensaje |
|
|
Treeview VB.net
Programación General
|
tazrebelraider
|
0
|
3,494
|
28 Febrero 2012, 05:53 am
por tazrebelraider
|
|
|
Problema treeview al eliminar nodo hijo
Programación Visual Basic
|
elezekiel
|
0
|
2,764
|
12 Noviembre 2014, 16:02 pm
por elezekiel
|
|
|
treeview.index
.NET (C#, VB.NET, ASP)
|
luismercedesrd
|
1
|
2,302
|
10 Junio 2016, 03:03 am
por AlbertoBSD
|
|
|
Seleccionar Nodo de Treeview
« 1 2 »
Programación Visual Basic
|
jack06
|
10
|
7,548
|
8 Mayo 2017, 21:11 pm
por jack06
|
|
|
Ayuda treeview
.NET (C#, VB.NET, ASP)
|
alexlopez91
|
1
|
2,488
|
18 Agosto 2017, 00:23 am
por Hadess_inf
|
|