treeview控件_treeview控件怎么用
Private Sub Form_Load() TreeView1.LineStyle = tvwRootLines TreeView1.Indentation = 200 TreeView1.Nodes.Add , , "Text", "Text" TreeView1.Nodes.Add "Text", tvwChild, "TestSub1", "TestSub1" TreeView1.Nodes.Add "Text", tvwChild, "TestSub2", "TestSub2" TreeView1.Nodes.Add "TestSub1", tvwChild, "TestSub3", "TestSub3" TreeView1.Nodes.Add "TestSub1", tvwChild, "TestSub4", "TestSub4" End Sub
treeview控件可以直接获取选中节点的值。
tv1是目标，tv2是你要添加的，如果在不同的窗体，请自行修改代码.。代码如下Private Sub Command1_Click() For i = 1 To TV2.Nodes.Count TV1.Nodes.Add TV1.SelectedItem.Key, tvwChild, TV1.SelectedItem.Key & "_" & TV2.Nodes(i).Key, TV1.SelectedItem.Text & "_" & TV2.Nodes(i).Text, 0, 0 NextEnd Sub没看出你的程序问题在哪，要注意的是节点text属性可以有重复的，但是key属性是不能有重复的，所以key的选择一定要有规律，我这里采用的是选定节点的key加上原节点的key做为新增节点的key，这样就可以确保key不会出错了。