O controle TreeView de VB.NET Framework Windows exibe uma lista hierárquica de elementos de dados. Consiste nas TreeNodes . Você pode acessar um TreeNode clicando no botão TreeView no VB.NET Toolbox em um formulário ou outro controle VB.NET em sua aplicação. Ele vai criar um ponteiro para o local nó de controle TreeView. Você precisa definir um valor da propriedade label TreeView para editar um TreeNode do TreeView em VB.NET . Instruções
1
Clique no botão " Iniciar" do Windows . Selecione "Microsoft Office" e "Microsoft Visual Studio. "
2
Clique em "Abrir " e selecione o seu programa Visual Basic com o TreeView que deseja editar .
3
Adicione o seguinte código após a linha " CurrentDb.Execute strSQL " em seu programa :
Private Sub treeView1_MouseDown (sender as Object , _
e As System.Windows.Forms.MouseEventArgs )
mySelectedNode = treeView1.GetNodeAt ( eX , eY)
End Sub Private Sub
menuItem_Click (sender As Object , e As System.EventArgs )
Se não ( mySelectedNode é nada ) E _
Not ( mySelectedNode.Parent é nada ) Então
treeView1.SelectedNode = mySelectedNode
treeView1.LabelEdit = True
If Not mySelectedNode.IsEditing Então
mySelectedNode.BeginEdit ()
End If
Else
MessageBox.Show ("No nó de árvore. "& _
Microsoft.VisualBasic.ControlChars.Cr & _
" A edição não é permitida. "," erro de Selecção ")
End If
End Sub
Sub treeView1_AfterLabelEdit privado ( sender As Object, _
e As System.Windows.Forms.NodeLabelEditEventArgs )
If Not ( e.Label Is Nothing ) Then
Se e.Label.Length > 0 Then
Se e.Label.IndexOfAny (New Char () { "@" c ", ". c " , " c ", " c }) = -1 Então
e.Node.EndEdit ( False)
Else
e.CancelEdit = True
MessageBox.Show ( "label inválido árvore de nós . " & _
Microsoft.VisualBasic.ControlChars.Cr & _
" Os caracteres inválidos são: '.' '@' , ' , ', ' ! ' ", _
" Nó Etiqueta Edit " )
e.Node.BeginEdit ()
End If
Else
e.CancelEdit = True
MessageBox.Show ( "label inválido árvore de nós . " & _
Microsoft.VisualBasic.ControlChars.Cr & _
" O rótulo não pode estar em branco "," Nó Etiqueta Edit " )
e.Node.BeginEdit ()
End If End If
End Sub
Isto irá ligar o TreeNode com o ponteiro do mouse.
4
Clique em "Arquivo " e "Salvar " para salvar o TreeNode editado a partir do TreeView em seu programa VB.NET .
