11. LastSibling 属性(Node 对象)
这个属性返回对 TreeView 控件中的 Node 对象的最后相邻节点的引用。
语法
object.LastSibling
object 所在处代表一个对象表达式,其值是“应用于”列表中的一个对象。
说明
最后的相邻节点是出现在一个节点层中最后位置上的 Node。实际上哪个 Node 出现在最后位置上取决于在那一层上的 Node 是否被排序,这由 Sorted 属性所确定。为了排序同一层上的 Node 对象,应把 Parent 节点的 Sorted 属性设置为 True。请参阅下面的代码:
Private Sub TreeView1_NodeClick(ByVal Node As Node)
Node.Parent.Sorted = True
End Sub
Child、FirstSibling、LastSibling、Previous、Parent、Next 和 Root 属性均返回对另一个 Node 对象的引用。所以,可以同时引用并执行对一个 Node 的操作,如下所示:
With TreeView1.Nodes(x).LastSibling
.Text = "New text"
.Key = "New key"
.SelectedImage = 3
End With
也可以将对象变量设置为引用的 Node,如下所示:
12. Previous 属性(Node 对象)
返回对 Node 对象的前一个相邻节点的引用。
语法
object. Previous
object 所在处代表一个对象表达式,其值是“应用于”列表中的一个对象。
说明
Child、FirstSibling、LastSibling、Previous、Parent、Next 和 Root 属性全部返回对另一个 Node 对象的引用,因此,可以同时引用并执行对 Node 的操作,如下所示:
With TreeView1.Nodes(x).Previous
.Text = "New text"
.Key = "New key"
.SelectedImage = 3
End With
也可以将对象变量设置为引用的 Node,如下所示:
Dim NodPrevious As Node
'获得对节点 x 的前一个相邻节点的引用。
Set NodChild = TreeView1.Nodes(x).Previous
'用此引用执行对前一个相邻节点的操作。
With nodPrevious
.Text = "New text" '改变文本。
.Key = "New key" '改变键。
.SelectedImage = 3 '改变
13. Next 属性(Node 对象)
这个属性返回对 TreeView 控件的 Node 对象的下一个相邻 Node 的引用。
语法
object.Next
object 所在处代表一个对象表达式,其值是“应用于”列表中的一个对象。
说明
Child、FirstSibling、LastSibling、Previous、Parent、Next 和 Root 属性均返回对另一个 Node 对象的引用。所以可以同时引用并执行对一个 Node 的操作,如下所示:
With TreeView1.Nodes(x).Child
.Text = "New text"
.Key = "New key"
.SelectedImage = 3
End With
也可以将对象变量设置为引用的 Node,如下:
Dim NodChild As Node
'获得对节点 x 的子节点的引用。
Set NodChild = TreeView1.Nodes(x).Child
'使用这个引用来执行对子节点的操作。
With nodChild
.Text = "New text" '改变文本。
.Key = "New key" '改变键。
.SelectedImage = 3 '改变