使用TreeView控件
点击次数：28 次 发布日期：2008-11-27 00:16:48 作者：源代码网
|
源代码网推荐 treeview控件用于显示分级的数据，列如组织树，磁盘上的文件和目录。 源代码网推荐 源代码网推荐 图例 2.40 典型的TreeView 源代码网推荐 源代码网推荐 可能用法： 源代码网推荐 .创建一个能被用户使用的组织树 源代码网推荐 .创建一个显示二级或更多数据的树 源代码网推荐 源代码网推荐 设置Node对象属性 源代码网推荐 源代码网推荐 一个”tree“由许多层叠树叉的“nodes”组成，每个结点由图片（设置图片属性）和一个标签（设置文本属性）代表构成。 源代码网推荐 提供给结点的图片由联结到TreeView控件的ImageList控件提供。 源代码网推荐 源代码网推荐 一个结点可以展开或收缩，依赖于此结点是否有子结点。在最顶端层是”root“结点，并且每个根结点有一定数量的子结点。 源代码网推荐 结点的总数不受限制（除非机器约束）。图例2.41显示一个树以及2个根结点；”root1“有3个子结点，”child3“有一个它 源代码网推荐 自己的子结点。”root2“有子结点，并且通过”+“预示，但是没有展开。 源代码网推荐 源代码网推荐 图例2.41 Root and child nodes 源代码网推荐 源代码网推荐 树里的每个结点实际是一个可编程的Node对象---属于Nodes 搜索集。在其他的搜索集，这里每个成员有一个唯一的引索和 源代码网推荐 关键属性，他们允许你存取结点的属性。例如，下面的结点用特定的引索node("7")设置图片和文本属性： 源代码网推荐 源代码网推荐 tvwMyTree.Nodes(7).Image="closed" 源代码网推荐 tvwMyTree.Nodes(7).Text="ieee" 源代码网推荐 源代码网推荐 无论如何，如果一个唯一的关键，例如”7 ID“被赋值于结点，代码书写如下： 源代码网推荐 tvwMyTree.Nodes("7 ID").Image="closed" 源代码网推荐 tvwMyTree.Nodes("7 ID").Text="ieee" 源代码网推荐 源代码网推荐 结点关系以及涉及的亲戚结点 源代码网推荐 源代码网推荐 每个结点能拥有子结点或父结点，依赖于与其他结点的关系。Node对象几个属性返回不同种关于子结点或父结点的信息。例如， 源代码网推荐 下面的代码使用Children属性返回子结点数量---前提，拥有子结点： 源代码网推荐 MsgBox tvwMyTree.Nodes(10).Children 源代码网推荐 源代码网推荐 尽管，一些属性不返回信息，作为子结点的属性，但是替代返回一个涉及其他的Node对象。例如，父结点属性返回父结点的任何 源代码网推荐 特定结点（只要这结点不是一个根结点）。由于这种涉及，你可以使用父结点调用任何方法或者设置属性，并应用到Node对象。 源代码网推荐 例如，下面的代码返回一个父结点的文本信息和引索属性。 源代码网推荐 源代码网推荐 MsgBox tvwMyTree.Nodes(10).Parent.Text 源代码网推荐 MsgBox tvmMyTree.Nodes(10).Parent.Index 源代码网推荐 源代码网推荐 提示： 使用set声明一个Node类型的对象变量使用涉及到其他的Node对象。例如，下面的代码设置一个Node对象变量涉及返回父结点 源代码网推荐 属性。接下来使用对象变量返回关系结点属性： 源代码网推荐 源代码网推荐 Dim tempNode As Node 源代码网推荐 Set tempNode=tvwMyTree.Nodes(10).Parent 源代码网推荐 MsgBox tempNode.Text 源代码网推荐 MsgBox tempNode.Index 源代码网推荐 源代码网推荐 添加Node对象到Nodes搜索集 源代码网推荐 添加Node到树，使用add方法。这个方法包含2个参数，relative和relationship，其决定在哪里添加结点。第一个参数relative 源代码网推荐 命名结点；第二个参数relationship指定新结点和结点（relative）的关系。 源代码网推荐 源代码网推荐 例如，下面的代码添加一个结点”11 node“作为结点”7 node“的一个子结点。常数tvwChild指定新结点是一个子结点。 源代码网推荐 第三个参数赋值关键属性到新结点。 源代码网推荐 tvwMyTree.Nodes.Add "7 node",tvwChild,"11 node" 源代码网推荐 源代码网推荐 提示：使用set声明使用add方法使的调试你的代码更简单。 源代码网供稿. |
