Den TreeView kontrol VB.NET Windows Framework viser en hierarkisk liste over dataelementer . Den består af TreeNodes . Du kan få adgang til en TreeNode ved at klikke på TreeView knappen i VB.NET Toolbox på en eller anden form VB.NET kontrol i din ansøgning . Det vil skabe en pointer til TreeView kontrol node placering. Du er nødt til at indstille en værdi af TreeView label ejendom for at redigere en TreeNode fra TreeView i VB.NET . Instruktioner
1
Klik på "Start " knappen i Windows. Vælg " Microsoft Office " og " Microsoft Visual Studio ".
2
Klik på " Åbn" , og vælg din Visual Basic -program med TreeView du ønsker at redigere .
3
Føj følgende kode efter " CurrentDb.Execute strSQL " linie i dit program : Hej
Private Sub treeView1_MouseDown ( afsender As Object , _
e Som System.Windows.Forms.MouseEventArgs )
mySelectedNode = treeView1.GetNodeAt ( eX , eY )
End Sub
Private Sub menuItem_Click ( afsender As Object , e Da System.EventArgs )
< p > Hvis ikke ( mySelectedNode Er Ingenting ) Og _
Not ( mySelectedNode.Parent Er Ingenting ) Så
treeView1.SelectedNode = mySelectedNode
treeView1.LabelEdit = Sand
Hvis ikke mySelectedNode.IsEditing Så
mySelectedNode.BeginEdit ()
End If
Else
MessageBox.Show ( "Ingen tree node. "& _
Microsoft.VisualBasic.ControlChars.Cr & _
" Redigering er ikke tilladt. "," Selection fejl " )
End If
< p > End Sub
Private Sub treeView1_AfterLabelEdit ( afsender As Object , _
e Som System.Windows.Forms.NodeLabelEditEventArgs )
p Hvis ikke ( e.Label Er Ingenting ) Derefter
Hvis e.Label.Length > 0 Then
p Hvis e.Label.IndexOfAny (New Char ( ) { "@" C, " . " c "," c " ! " c } ) = -1 Så
e.Node.EndEdit ( False )
Else
e.CancelEdit = Sand
MessageBox.Show ( "Ugyldig træknude etiket. " & _
Microsoft.VisualBasic.ControlChars.Cr & _
»De ugyldige tegn er: '@' , ',' , '. ' ! '" _
" Node Label Edit " )
e.Node.BeginEdit ()
End If
Else
< p > e.CancelEdit = Sand
MessageBox.Show ( "Ugyldig træknude etiket. " & _
Microsoft.VisualBasic.ControlChars.Cr & _
" etiketten kan ikke være tom "," Node Label Edit " )
e.Node.BeginEdit ()
End If
End If
End Sub
Dette vil binde TreeNode med musemarkøren .
4
Klik på "File " og " Gem " for at gemme den redigerede TreeNode fra TreeView i din VB.NET program.
< br >