Add Node TreeView

Bom dia,

Gostaria de saber como faço para adicionar um outro nó dentro de Teste1, Teste2, Teste3 no treeview.

2021-06-18_091351

2021-06-18_091451

Oi, Jeferson. Bom dia.
Este exemplo vai lhe ajudar:

Sub CommandButton1_Click()
set treeview = Screen.Item("TreeView1")
treeview.Nodes.Add , , "Geral_1", "G1"
treeview.Nodes.Add "Geral_1", 4, "Node1", "N1"
treeview.Nodes.Add "Geral_1", 4, "Node2", "N2"
treeview.Nodes.Add "Node1", 4, "SubNode11", "SN1"
treeview.Nodes.Add "Node1", 4, "SubNode12", "SN2"
treeview.Nodes.Add "Node2", 4, "SubNode21", "SN1"
treeview.Nodes.Add "Node2", 4, "SubNode22", "SN2"
End Sub
1 Like

Bom dia @jeferson1.

Primeiro vamos dar uma olhada na sintaxe da função ADD:
image

Detalhando os parâmetros:
Relative: Key do Nó relativo.
Relationship: Localização relativa do novo nó em relação ao nó relativo.
Valores possíveis para o parâmetro são definidos pela tabela abaixo:
0 - tvwFirst: novo nó será o primeiro irmão do nó relativo.
1 - tvwLast: novo nó será o último irmão do nó relativo.
2 - tvwNext: novo nó será irmão posterior do nó relativo.
3 - tvwPreviows: novo nó será irmão anterior ao nó relativo.
4 - tvwChild: novo nó será filho do nó relativo.

Key: Key do Nó que está sendo criado.
Text: Texto de exibição do nó que está sendo criado.
Image: Imagem a ser exibida no nó criado.
SelectedImage: Imagem a ser exibida no nó quando este estiver selecionado.

Com base nas informações acima, para criar um nó filho do nó “Teste1” você primeiro precisa definir uma Key para ele:

Altere a linha onde o nó “Teste1” é criado, acrescentando uma key para o nó “Teste1”:

TreeView1.Nodes.Add "Geral_1", 4, "Teste1", "Teste1"

Agora para adicionar um nó filho do nó “Teste1”, você deve usar uma linha assim:

TreeView1.Nodes.Add "Teste1", 4, "KeyFilhoTeste1", "FilhoTeste1"

2 Likes