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
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
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
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 .
Programmazione © www.354353.com