[转帖][分享]TreeView控件使用教程5
时 间:2009-04-21 08:32:47
作 者:UMVSoft整理 ID:1445 城市:上海
摘 要:TreeView控件
正 文:
14. FullPath 属性
这个属性返回在 TreeView 控件中引用的 Node 对象的完整限定路径。当赋予该属性为字符串变量时,该字符串被设为具有指定索引的 FullPath 节点。
语法
object.FullPath
object 所在处代表一个对象表达式,其值是“应用于”列表中的一个对象。
说明
完整限定路径是引用的 Node 对象的 Text 属性中的文本与它的所有前辈的 Text 属性值的连接。PathSeparator 属性的值确定定界符。
FullPath 属性示例
这个例子为 TreeView 控件添加几个 Node 对象,并在每个对象被选中时显示其完整限定路径。为试用此例,要在窗体上安放一个 TreeView 控件并在窗体的声明部分粘贴该代码。运行此例,然后选择一个节点,单击窗体显示该 Node 对象的完整路径。
Private Sub Form_Load()
Dim nodX As Node
Set nodX = TreeView1.Nodes.Add(,,,"Root")
Set nodX = TreeView1.Nodes.Add(1,tvwChild,,"Dir1")
Set nodX = TreeView1.Nodes.Add(2,tvwChild,,"Dir2")
Set nodX = TreeView1.Nodes.Add(3,tvwChild,,"Dir3")
Set nodX = TreeView1.Nodes.Add(4,tvwChild,,"Dir4")
nodX.EnsureVisible '显示全部节点。
TreeView1.Style = tvwTreelinesText '样式 4。
End Sub
15. Selected 属性(ActiveX 控件)
返回或设置确定一个对象是否被选中的值。对于 ListItem 对象,Selected 属性不设置 SelectedItem 属性,这样就不会使对象被选中。它仅返回一值,表明是否已用其它方法选中了 ListItem 对象。
语法
object.Selected [ = boolean]
Selected 属性语法包含下面部分:
部分 描述
object 对象表达式,其值是“应用于”列表中的一个对象。
boolean 布尔表达式,指明对象是否已被选中。
说明
用 Selected 属性编程选择指定的 Node 或 Tab 对象。一旦用此法选定了对象,就可对此对象执行各种操作,如设置各种属性及调用各种方法。
为选择指定的 Node 对象,必须通过它的 Index 属性或 Key 属性的值去引用它。下面的例子是在 TreeView 控件中选择指定的 Node 对象:
Private Sub Command1_Click()
TreeView1.Nodes(3).Selected = True '选择对象。
'用 SelectedItem 属性得到对该对象的引用。
TreeView1.SelectedItem.Text = "Changed Text"
End Sub
在 ListView 控件中,SelectedItem 属性总是引用第一个选中的项,因此,如多个项被选中,必须遍历所有选中
16. SelectedImage 属性
返回或设置在相关的 ImageList 控件中的 ListImage 对象的索引值或键值;当 Node 对象被选中时显示 ListImage。
语法
object.SelectedImage [ = index]
SelectedImage 属性语法包含下面部分:
部分 描述
object 对象表达式,其值是“应用于”列表中的一个对象。
index 整数或唯一字符串,标识在相关的 ImageList 控件中的 ListImage 对象。整数是 ListImage 对象的 Index 属性的值;字符串是 Key 属性的值。
说明
如果这个属性置为 Null,则使用由 Image 属性指定的缺省图形的屏蔽。
17. Expanded 属性
这个属性返回或设置一个值,该值确定在 TreeView 控件中的 Node 对象当前是被展开的还是被折叠的。
语法
object.Expanded[= boolean]
Expanded 属性的语法包含下面部分:
部分 描述
object 对象表达式,其值是“应用于”列表中的一个对象。
boolea
Access软件网QQ交流群 (群号:54525238) Access源码网店
常见问答:
技术分类:
源码示例
- 【源码QQ群号19834647...(12.17)
- Access对子窗体数据进行批...(10.30)
- 最精简的组合框行来源数据快速输...(10.25)
- Access仿平台的多值选择器...(10.24)
- 【Access日期区间段查询】...(10.22)
- 【Access源码示例】VBA...(10.12)
- Access累乘示例,Acce...(10.09)
- 数值8.88,把整数8去掉,转...(10.08)
- 【Access自定义函数】一个...(09.30)
- 【Access选项卡示例】Ac...(09.09)
学习心得
最新文章
- Access快速开发平台--对上传...(11.22)
- Access快速开发平台企业版--...(11.18)
- 不会用多表联合查询,多表查询没结果...(11.16)
- 【案例分享】主键字段值含有不间断空...(11.16)
- Access快速开发平台--后台D...(11.14)
- 微软Access邀测新Monaco...(11.12)
- Access列表框左右互选、列表框...(11.11)
- 高效率在导入数据前删除记录(11.10)
- Access报价单转订单示例代码(11.08)
- Access系统自带的日期选择器不...(11.08)