Ako kopírovať TreeView vo VB6

TreeView Control vo VB6 ( Visual Basic 6 ) zobrazuje informácie v hierarchii . TreeView sa skladá z uzlov , ktoré sa vzťahujú k sebe navzájom v niektorých ohľadoch . Prieskumník Windows je dobrým príkladom toho , TreeView zobrazenia súborov a priečinkov v hierarchickom spôsobom . Uzol v TreeView konaní môže obsahovať ďalšie uzly , ktoré sa nazývajú " podriadené uzly . " Môžete zobraziť rodičovských uzlov ako rozbaliť alebo zbaliť . Každý uzol má vlastnosti ako " rodič " , " FirstNode " a " uzly " . Môžete získať každý uzol pomocou rekurzívne postup VB6 skopírovať uzla do iného stromu . Veci , ktoré budete potrebovať klipart VB6 program ,
Zobraziť viac Inštrukcie Cestuj 1

Kliknite na tlačidlo " Štart " , " Všetky programy " a " Visual Basic 6 " . Kliknite na " Súbor " a " Nový " pre vytvorenie nového projektu . Zadajte názov projektu a vyberte umiestnenie pre súbory projektu . Kliknite na " Form1 " na navigačnej table na ľavej časti okna .
2

Kliknite na " Nástroje " a " Button " . Kliknite na prázdnu oblasť na Form1 pridať tlačidlo . Kliknite pravým tlačidlom myši na formulár 1 a zadajte nasledujúci kód pre vytvorenie rekurzívne postup , ktorý opakuje každý uzol v strome :

Private Sub IterateTreeNodes ( byval tnod ako TreeNode , ByVal RootNode Ako TreeNode )

Dim childNode Ako TreeNode

každý childNode V tNode.Nodes

Dim newnode Ako TreeNode = New TreeNode ( childNode.Text )

NewNode.Tag = childNode.Tag

Me.treeView2.SelectedNode = RootNode

Me.treeView2.SelectedNode.Nodes.Add ( newnode ) Spojené

IterateTreeNodes ( childNode , newnode )

Ďalšie

End Sub
3

Dvakrát kliknite na tlačidlo a zadajte nasledujúci kód skopírujte uzly v TreeView1 na TreeView2 :

Private Sub Button1_Click ( byval odosielateľa as Object , byval e ako System.EventArgs )

Dim t ako TreeNode

každý tnod V Me.treeView1.Nodes

Dim newnode ako TreeNode = New TreeNode ( tnod . Text )

NewNode.Tag = originalNode.Tag

Me.treeView2.Nodes.Add ( newnode ) Spojené

IterateTreeNodes ( tnod , newnode )

budúci

End Sub

• Predchádzajúca strana: Ako previesť HTML reťazcové premenné kód za VB.NET 
• Ďalšia strana: Ako Animácie Sprite v XNA hre