[求助]如何在ACCESS2000中使用TreeView控件？

tanjh

如何在ACCESS2000中使用TreeView控件？[em01]

Benjamin_luk

不是吧, 版主都不会?没搞错吧

Benjamin_luk

者： esmile

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

tanjh

使用之前要做什么引用吗？我可以直接在ACCESS2000中用TREEVIEW控件吗？我直接用了，但没有node这个子对象。根本就没有treeview.node这一说。[em03]

Benjamin_luk

treeview 这个是你所建控件的名称,treeview.Nodes.Add(......

tanjh

我试了。也管用。谢谢。不过关于那个NODE的CLICK事件需要自己写在模块中还是该控件自带的？

Benjamin_luk

那个NODE的CLICK事件需要自己写

lhxhome

哪里能学到treeview控件的语法？