Bom dia,
Gostaria de saber como faço para adicionar um outro nó dentro de Teste1, Teste2, Teste3 no treeview.
Bom dia,
Gostaria de saber como faço para adicionar um outro nó dentro de Teste1, Teste2, Teste3 no treeview.
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
Bom dia @jeferson1.
Primeiro vamos dar uma olhada na sintaxe da função ADD:
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"