EnsureVisible

确保节点可见。

示例

假定有一个下图所示的行政区域表:

窗口有个目录树,根据此表生成,希望打开窗口的时候,能够自动展开并滚动“湖南省”这个节点至顶端,使得其子节点可见。
为此可以将窗口的AfterLoad事件代码设置为:

Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
trv.BuildTree(
"行政区域","省市|县市") '生成目录树
Dim
nd As WinForm.TreeNode = trv.Nodes("湖南省") '获得名为“湖南省”的节点
Dim
idx As Integer = Math.MIn(20, nd.Nodes.Count - 1) '获得“湖南省”的第20个或最后一个子节点的位置
trv.SelectedNode = nd
'选择"湖南省"节点
nd.Nodes(idx).EnsureVisible
'使得湖南省的第20个或最后一个子节点可见.

上述代码的原理很简单,通过使“湖南省”的第20个子节点可见,间接达到展开并滚动“湖南省”这个节点至顶端的目的:

 

 

 

 


本页地址:http://www.foxtable.com/webhelp/topics/0914.htm