以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  目录树管理表  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=173660)
--  作者：张飞
--  发布时间：2021/12/10 14:48:00
--  目录树管理表
Dim trv As WinForm.TreeView = e.Form.Controls("目录树")
For Each nd As WinForm.TreeNode In trv.AllNodes
    If  nd.Nodes.count = 0 Then
        For Each dr As Table In Tables
            If dr.name = nd.name Then
                MainTable = Tables(e.node.text)
                Exit For
            End If
        Next
    End If
Next


为什么不是最底节点，双击后循环提示找不到表   怎么修改代码

[此贴子已经被作者于2021/12/10 14:49:05编辑过]
--  作者：有点蓝
--  发布时间：2021/12/10 14:51:00
--  
目录树的NodeMouseDoubleClick事件？表名是节点名称name 还是节点标题text？

if Tables.contains(e.node.text) then
MainTable = Tables(e.node.text)
end if
--  作者：张飞
--  发布时间：2021/12/10 15:01:00
--  
表名是节点name,谢谢，把问题想复杂了，整好了