已经把数据添加到treeview里面了,想实现点击一个按钮,treeview 从第一个节点自动点击移动到最后一个节点。
请高手给解决方案。

解决方案 »

  1.   


    Private Sub Command1_Click()
    Dim Tmp As String
    Tmp = TreeView1.Nodes(TreeView1.Nodes.Count).Text
    TreeView1.Nodes(TreeView1.Nodes.Count).Text = TreeView1.Nodes(1).Text
    TreeView1.Nodes(1).Text = TmpEnd SubPrivate Sub Form_Load()
    TreeView1.Nodes.Add , , "A", "AAA"
    TreeView1.Nodes.Add , , "B", "BBB"
    TreeView1.Nodes.Add "A", tvwChild, "C", "CCC"
    TreeView1.Nodes.Add "A", tvwChild, "D", "DDD"
    TreeView1.Nodes.Add "A", tvwChild, "E", "EEE"TreeView1.Nodes(1).Expanded = True
    End Sub
    只是把TEXT是属性改变了,不知道是不是楼主想要的