excel-vba--TreeView控件概述、属性与方法.docVIP

excel-vba--TreeView控件概述、属性与方法.doc

  1. 1、本文档共2页,可阅读全部内容。
  2. 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  5. 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  6. 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  7. 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  8. 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多

TreeView控件概述、属性与方法

1、作用:用于显示Node结点的分层列表。

2、添加到控件箱

菜单命令:工程|部件,在部件对话框中选择:MicrosoftWindowsCommonControls6.0

3、TreeView控件的属性

〔1〕属性对话框

用鼠标右键单击TreeView控件,在弹出式菜单中选择属性,进入属性设置对话框,该对话框分为通用、字体、图片三个选项卡,如图8.6所示。

?

?

?

图8.6TreeView属性设置对话框

①样式〔Style〕:返回或设置在Node结点之间显示的线样式,如表8.6所示。

?

?

表8.6TreeView控件的显示样式

②鼠标指针(MousePoint):可选择不同鼠标样式,如表8.1所示。

③线条样式〔LineStyle〕:0-tvwTreeLine无根结点的树形结构,1-tvwRootLines有根结点的树形结构。

④标签编辑(LabelEdit):0-tvwAutomatic自动,1-tvwManual手工;

⑤图像列表(ImageList):结点图标所用ImageList控件;

⑥边框样式(BorderStyle):0-ccNone无边框,1-ccFixedSingle单边框;

⑦外观〔Appearence〕:0-ccFlat平面效果,1-cc3D3D效果;

⑧缩进:父子结点的水平间距。

〔2〕其它属性

①SelectedItem.Text属性:用于返回或设置当前Node结点的内容。

②CheckBoxes属性:该属性只能取逻辑值,假设取True值,那么每个Node结点前出现一个复选框,否那么不出现复选框。

4、TreeView控件的方法

〔1〕Node结点

①Node结点:是TreeView控件中的一项,它包含图像与文本。

②Nodes结点集合:包含一个或多个Node结点。

〔2〕Add方法

①作用:为TreeView控件添加节点和子节点。

②定义格式

TreeView1.nodes.Add(Relative,Relationship,Key,Text,Image,SelectedImage)

其中:

◆Relative参数:添加新结点时,其父结点键值Key。添加根结点时,此项为空。

◆Relationship参数:新结点的相对位置:

tvwlast—1:新节点位于同级别所有节点之后;

tvwNext—2:新节点位于当前节点之后;

tvwPrevious—3:新节点位于当前节点之前;

tvwChild—4:新节点成为当前节点的子节点。

◆Key:Node结点关键字〔唯一标识符〕,用于检索Node结点。同时也作为其新建子结点的Relative值,即新建子结点的Relative=父结点Key。

◆Text:Node结点文本。

◆Image:Node结点位图,是关联ImageList控件中位图的索引。

在这些参数中,只有Text参数是必需的,其它参数都是可选的。

例如,在TreeView1控件的根结点上添加“计算机系”结点的程序段如下:

DimNodAsNode

Key=计算机系

Text=计算机系

SetNod=TreeView1.Nodes.Add(,tvwChild,Key,Text)

而在计算机系结点下添加“计算机30331”班子结点的程序段如下:

Key1=计算机30331

Text1=计算机30331

SetNod=TreeView1.Nodes.Add(Key,tvwChild,Key1,Text1)

上述程序段运行后,屏幕显示如图8.7所示

?

?

图8.7在TreeView添加计算机系与计算机30031班

〔2〕Clear方法:用于删除TreeView控件的所有Node结点。

〔3〕Remove方法:用于移动TreeView控件的结点位置。

key值不能为数字

文档评论(0)

199****4744 + 关注
实名认证
文档贡献者

该用户很懒,什么也没介绍

版权声明书
用户编号:7002121022000045

1亿VIP精品文档

相关文档