目录树顶层节点 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 目录树顶层节点

共有3992人关注过本帖树形打印复制链接主题：目录树顶层节点

chen_sheng

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：三尾狐帖子：700 积分：6230 威望：0 精华：0 注册：2018/5/10 9:05:00

目录树顶层节点 发帖心情

Post By：2023/3/9 18:08:00 [显示全部帖子]

Dim tr As WinForm.TreeView = Forms(e.form.name).Controls("TreeView1")

Dim s As String = tr.SelectedNode.ParentNode.Text

msgbox(s)

Dim r As Row = Tables(e.form.name & "_Table1").AddNew

r("分类")=s

如何获取顶层节点呢

chen_sheng

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：三尾狐帖子：700 积分：6230 威望：0 精华：0 注册：2018/5/10 9:05:00

Post By：2023/3/10 9:07:00 [显示全部帖子]

抱歉问题没有完全表达清楚，想新增行获取目录树当前节点的text 在新增行的分类内直接赋值

Nodes

节点集合，可以通过此集合访问指定名称或位置的节点不是指定的节点

Dim tr As WinForm.TreeView = Forms(e.form.name).Controls("TreeView1")

Dim s As String = tr.SelectedNode.ParentNode.Text

Dim r As Row = Tables(e.form.name & "_Table1").AddNew

r("分类")=s

此主题相关图片如下：2bacc97a-c06e-48dc-aff8-d1503764e03c.png

主题：目录树顶层节点