vb中树状图使用方法.docVIP

热身：理解层级概念，层级理论上可以有无限级，一般用到四，五级也够用了。最上级的只能有一个，我们把它叫做“爷”，接下来是“父”，再是“子”，再是“孙”，接下来是“曾孙”......，汇总如下：“爷，父，子，孙，曾孙”，这里是5级关系，除了“爷”只能有一个外，其余可以有无限个。记住这些，下面要用。 第一小时：学习直接用代码将数据填充到树控件中。为什么要先学习直接用代码将数据填充到树控件中？因为这种方法是最简单的，代码也最容易理解，学习树控件，先将这个学会，已经掌握了一半，所以先不要急着想怎么将表中的数据填充到树控件中，在第一小时里，树控件和表完全没有关系。目的：我们要在树控件中建立如下的一个3层级关系 水果||__苹果| |__红富士| |__国光||__葡萄|__红提子|__青提子 解释：水果包含2种，一种是苹果，一种是葡萄，苹果又包含2种，一种是红富士，一种是国光，葡萄也如此。在这里：“爷”是水果，“父”是苹果，葡萄，“子”是红富士，国光，红提子，青提子。概括如下：爷（只能有一个）：水果父（这里有2个）：父1：苹果；父2：葡萄子（这里有4个）：子1：红富士（父1苹果的子）；子2：国光（父1苹果的子）；子3：红提子（父2葡萄的子）；子4：青提子（父2葡萄的子） 1、新建一个窗体，在窗体上放置两个控件，一个是Treeview，一个是Imagelist如何找到这两个控件？Treeview控件在“工具箱”的榔头加扳手图标（其他控件）中选“Microsoft Treeview Control,Version 6.0Imagelist控件在“工具箱”的榔头加扳手图标（其他控件）中选“Microsoft Imagelist Control,Version 6.0Treeview控件大家都明白干什么用的，Imagelist控件是干什么用呢？原来这个控件是放图标用的，如果你想在树控件中显示图标的，这个图标都将储存在ImageList控件中。 2、设置这两个控件的属性首先要讲清楚控件的属性设置有2种，一种是设置这个控件在ACCESS中的属性，比如名称等。一种是设置这个控件本身的属性。要设置这个控件在ACCESS中的属性，选中控件后按鼠标右键选“属性”就可以了。跟我们平时设置文本框什么的一样。要设置这个控件本身的属性，只要双击这个控件就可以了。1）设置Treeview控件在ACCESS中的名称属性，将名称设置为“Treeview2）设置Imagelist控件在ACCESS中的名称属性，将名称设置为“Image2)设置Imagelist控件本身的属性，双击控件后，在弹出来的设置框中选“Images,单击“Insert Picture按钮，在你电脑中选择你需要的图标。在“Key:”栏中填入“K1”。其他默认设置不用改。3）设置Treeview控件本身的属性，双击控件后，在弹出来的设置框中选“General”，在这个选项面版中有很多项设置，大多数是设置树控件的显示格式，你自己慢慢研究。这里我们将第一项“Style选7，在第五项“Imagelist选项中将我们放置的Imagelist控件“Image选上。这项设置就将图标和树控件联系了起来。 3、写代码将数据填充到树控件中代码写在哪里？我们希望窗体一打开，数据就自动填充在树控件中，所以这个代码就写在窗体的加载事件中，代码及解释如下： VBScript code复制代码 Private Sub Form_Load() * ----------------------------------------------------------------- *用代码将数据填充到树控件中 * ----------------------------------------------------------------- Dim Nodeindex As Node *------------------------------------------------------------------ *解释：定义Node *Node是树控件的对象 *每个Node都有三个东西，图标，文本，索引值 *图标和文本都是实际显示出来的，索引值是隐含的 *------------------------------------------------------------------ 设置最顶级的“爷”: * --------------------------- Set Nodeindex = TreeView.Nodes.Add(, , 爷, 水果, K1) N