Il controllo TreeView di VB.NET di Windows Framework visualizza un elenco gerarchico di elementi di dati . E 'costituito dai TreeNodes . È possibile accedere a un TreeNode facendo clic sul pulsante TreeView in VB.NET Toolbox su un modulo o un altro controllo VB.NET nell'applicazione. Si creerà un puntatore al controllo della posizione del nodo TreeView . È necessario impostare il valore della proprietà dell'etichetta TreeView al fine di modificare un TreeNode dal controllo TreeView in VB.NET . Istruzioni
1

Fare clic sul pulsante "Start " di Windows . Selezionare "Microsoft Office " e "Microsoft Visual Studio ".
2

Fare clic su " Apri" e selezionare il programma di Visual Basic con il TreeView che si desidera modificare .
3

Aggiungere il seguente codice dopo la riga " CurrentDb.Execute strSQL " nel vostro programma :

privato treeView1_MouseDown Sub ( sender As Object , _

e As System.Windows.Forms.MouseEventArgs ) per

mySelectedNode = treeView1.GetNodeAt ( ex, ey)

End Sub private Sub

menuItem_Click ( sender As Object , e As System.EventArgs ) per < p > If Not ( mySelectedNode è niente) E _

Not ( mySelectedNode.Parent è niente) Poi

treeView1.SelectedNode = mySelectedNode

treeView1.LabelEdit = True

Se Non mySelectedNode.IsEditing Poi

mySelectedNode.BeginEdit ( ) per

End If

Else

MessageBox.Show (" Nessun nodo della struttura . "& _

Microsoft.VisualBasic.ControlChars.Cr & _

" Editing non è permesso . "," errore di selezione " ) per

End If
< p > End Sub private Sub

treeView1_AfterLabelEdit ( sender As Object , _

e As System.Windows.Forms.NodeLabelEditEventArgs ) per

If Not ( e.Label è niente) Poi

Se e.Label.Length > 0 Then

e.Label.IndexOfAny ( New Char ( ) {" @ " c " . " c " , " c ", " c } ) = -1 Poi

e.Node.EndEdit ( Falso ) per

Else

e.CancelEdit = True

MessageBox.Show ( " etichetta non valida nodo della struttura . " & _

Microsoft.VisualBasic.ControlChars.Cr & _

" I caratteri non validi sono : '@' , , ',' , '' . ' ! '" , _

" Etichetta nodo Modifica " ) per

e.Node.BeginEdit ( ) per

End If

Else
< p > e.CancelEdit = True

MessageBox.Show ( " etichetta non valida nodo della struttura . " & _

Microsoft.VisualBasic.ControlChars.Cr & _

"L'etichetta non può essere vuoto "," Etichetta nodo Modifica " ) per

e.Node.BeginEdit ( ) per

End If End If

End Sub

legherà il TreeNode con il puntatore del mouse .
4

Fare clic su " File" e " Salva" per salvare la modifica TreeNode dal TreeView nel programma VB.NET .