Foxtable(狐表)用户栏目专家坐堂 → treeview定位


  共有1977人关注过本帖树形打印复制链接

主题:treeview定位

帅哥哟,离线,有人找我吗?
yxl2012
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:137 积分:1676 威望:0 精华:0 注册:2018/8/30 20:55:00
treeview定位  发帖心情 Post By:2021/7/10 22:48:00 [只看该作者]

  请教老师,打开界面后,想treeview展开默认定位到最后一个节点。当添加记录后,刷新treeview也能定位到最后一个节点,即该记录节点。

 回到顶部
帅哥哟,离线,有人找我吗?
chnfo
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2199 积分:18081 威望:0 精华:0 注册:2011/11/26 20:21:00
  发帖心情 Post By:2021/7/11 14:40:00 [只看该作者]

Dim trv As WinForm.TreeView 
trv.ExpandAll
Dim lstnd As new List(of WinForm.TreeNode
For Each nd As WinForm.TreeNode In trv.AllNodes
    lstnd.Add(nd)
Next

trv.SelectedNode = lstnd(lstnd.Count - 1)

 回到顶部
帅哥,在线噢!
有点蓝
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106688 积分:542629 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/7/11 21:28:00 [只看该作者]

Dim trv As WinForm.TreeView = e.Form.controls("TreeView1")
trv.ExpandAll
Dim nd As WinForm.TreeNode
nd = trv.Nodes(trv.Nodes.Count - 1)
Do While nd.Nodes.Count > 0
    nd = nd.Nodes(nd.Nodes.Count - 1)
Loop
trv.SelectedNode = nd
nd.EnsureVisible

 回到顶部