Ako upraviť TreeNode Od TreeView vo VB.NET

Ovládací prvok TreeView z VB.NET Framework Windows zobrazuje hierarchický zoznam dátových prvkov . Skladá sa z TreeNodes . Môžete pristupovať k TreeNode kliknutím na tlačidlo TreeView vo VB.NET nástrojov na formulári alebo iného ovládacieho prvku VB.NET vo vašej aplikácii . To vytvorí ukazovateľ na ovládacom prvku TreeView umiestnenie uzla . Musíte nastaviť hodnotu vlastnosti TreeView štítkov , aby sa upraviť TreeNode z TreeView vo VB.NET . Pokyny dovolená 1

Kliknite na tlačidlo " Štart " vo Windows . Vyberte " Microsoft Office " a " Microsoft Visual Studio " .
2

Kliknite na " Otvoriť " a vyberte Visual Basic program TreeView , ktorý chcete upraviť .
3

Pridajte nasledujúci kód po " CurrentDb.Execute strSQL " riadku v programe :

Private Sub treeView1_MouseDown ( sender As Object , _

e ako System.Windows.Forms.MouseEventArgs )

mySelectedNode = treeView1.GetNodeAt ( eX , EY )

End Sub

Private Sub menuItem_Click ( sender As Object , e ako System.EventArgs )

Ak nie ( mySelectedNode nie je nič ) A _

nie ( mySelectedNode.Parent nie je nič ) Potom

treeView1.SelectedNode = mySelectedNode

treeView1.LabelEdit = TRUE

Ak nie je mySelectedNode.IsEditing Potom

mySelectedNode.BeginEdit ( )

End If

Else

MessageBox.Show ( " Žiadny uzol stromu . " & _

Microsoft.VisualBasic.ControlChars.Cr & _

" editácia nie je povolená . " , " Chyba Selection " )

End If

End Sub

Private Sub treeView1_AfterLabelEdit ( sender As Object , _

e ako System.Windows.Forms.NodeLabelEditEventArgs )

Ak nie ( e.Label nie je nič ) , potom

Ak e.Label.Length > 0 Then

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

e.Node.EndEdit ( False )

Else

e.CancelEdit = TRUE

MessageBox.Show ( " Neplatný uzol stromu štítok . " & _

Microsoft.VisualBasic.ControlChars.Cr & _

" Neplatné znaky sú : " . " ' @ ' , , , ' , ' ' ! " " , _

" uzol Label Edit " )

e.Node.BeginEdit ( )

End If

Else

e.CancelEdit = TRUE

MessageBox.Show ( " Neplatný uzol stromu štítok . " & _

Microsoft.VisualBasic.ControlChars.Cr & _

" značka nemôže byť prázdny " , " uzol Label Edit " )

e.Node.BeginEdit ( )

End If

End If

End Sub

bude viazať TreeNode s ukazovateľom myši .
4

Kliknutím na tlačidlo " Súbor " a " Uložiť " pre uloženie editovaného TreeNode z TreeView do svojho programu VB.NET .

• Predchádzajúca strana: Ako Počet slov v textové polia v programe Visual Basic ( VB ) 
• Ďalšia strana: Ako Skontrolujte , či nie je prázdne GridView s žiadnym Riadky