TreeView1.CheckBoxes = True
任何将checkboxes选中的多个node  text付值给变量或者打印啊

解决方案 »

  1.   

    dim array()for i=1 to TreeView.Nodes.count
        if TreeView.Nodes(i).Checked then
            array(i)=TreeVide.Nodes(i).Text
        endif
    next
      

  2.   

    你到底是要得到所有节点的text还是选中上一级,让下一级都自动选中啊?如果是后一种,那代码如下:
    for i = 2 to Treeview.nodes.count
        Treeview.nodes(i).checked = treeview.nodes(1).checked
    next
      

  3.   

    thank you!!!!!!!!!!!!!!!!!!!!!!!!!11
    原因是我"工程"---"部件"里面选择的是5.0
    现在换了6.0的就OK了