谁给我发一个实例,[email protected]

解决方案 »

  1.   

    应该是这样
    1.   Set TreeView1.ImageList = ImageList1
    2.   TreeView1.Style = 7
    3.   treeview1.Nodes.Add 时要加上Picture的index
    4.   在窗体上加上个 Imagelist 里面加个图标
      

  2.   

    工程--->部件--->Microsoft Windows Common Controls 6.0
    1、为树状浏览器控件添加节点和子节点   用ADD方法添加一个新节点到树状浏览器的NODES集合时,可以声明它是和已
    存在的节点所联系起来的。通常使用ADD方法,其语法如下:    Nodes.Add(relative,[relationship][,key][,text][,image][,selectedimage])   各个参数的意义如下:   relationship 参数是通过关系节点参数与新节点连接的另一个节点;
       relationship 参数可能是以下情况: 
         tvwlast--1;该节点置于所有其他的在relative中被命名的同一级别
    的节点的后面 
         tvwNext--2;该节点置于在relative中被命名节点的后面 
         tvwPrevius--3;该节点置于在relative中被命名的节点的前面 
         tvwChild--4;该节点成为在relative中被命名的节点的的子节点   下面是一个例子:   Dim node1,node2,node3,node4 as Node 
       set Node1=TreeView1.Nodes.Add 
       TreeView1.Nodes(1).text="node1" 
       TreeView1.Nodes(1).key="node1" 
       Set node2=treeview.nodes.add("node1",tvwChild,"node2") 
       TreeView1.Nodes(2).text="node2" 
       TreeView1.Nodes(2).key="node2"   依次插入节点即可。 2、为节点插入图象    treeview1.node(3).image="leaf"   注意我们一般从imagelist中指定图象 3、处理节点的点击,怎样才能知道树状浏览器的哪一个节点被点击了呢?可以用
    NodeClick 事件:   public sub treeview1_nodeclick(byval node as comctllib.node) 
       text1.text="you click"&node.text 
       end sub