大虾，小弟是采袅 请问vb里怎么建立一个树型菜单？？急

Question

大虾，小弟是采袅 请问vb里怎么建立一个树型菜单？？急

Answer 1

private sub form_load()
在IMAGELIST　控件中加载位图
dim imgX as listimage
dim bitmappath as string
treeview1.HotTracking=true
bitmappath="路径"
set imgX=imagelist1.listimages.add(,,loadpicture(bitmappath))
treeview1.imagelist=imagelist1
dim nodX as node  '创建树
set nodX=treeview1.nodes.add(,,,"parent1",1)
set nodX=treeview1.nodes.add(,,,"parent2",1)
set nodX=treeview1.nodes.add(1,tvwchild,,"child1",1)
set nodX=treeview1.nodes.add(1,tvwchild,,"child2",1)
set nodX=treeview1.nodes.add(2,tvwchild,,"child3",1)
set nodX=treeview1.nodes.add(2,tvwchild,,"child4",1)
set nodX=treeview1.nodes.add(3,tvwchild,,"child5",1)
nodX.ensurevisible
end sub

Answer 2

如果要和数据库结合，参考：
http://www.microsoft.com/china/community/Column/21.mspx

Answer 3

从xml文件建立树形结构
How To Populate a Treeview Control with an XML Filehttp://support.microsoft.com/default.aspx?scid=kb;EN-US;244954

Answer 4

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

Answer 5

treeview 控件，楼上的说的很详细，好，，呵呵，

Answer 6

treeview控件在那个部件里头？

Answer 7

工程－－－部件－－－－microsoft windows common controls6.0里！
最好选最高的