以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 求助 关于目录树的问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=44000) |
|
-- 作者:飞天 -- 发布时间:2013/12/20 12:56:00 -- 求助 关于目录树的问题 Dim trv As WinForm.TreeView = e.Form.Controls("TreeView2") For Each nd As WinForm.TreeNode In trv.AllNodes If nd.Checked Then Dim dr As DataRow = DataTables("组件表").AddNew() dr("物料名称") = nd.Text End If Next 以上代码,是各个节点以新增行的形式存储到指定表的指定列. 但有一个问题,以上代码会将父节点也存储到表中, 这是不行的,,请问如何解决?
|
|
-- 作者:Bin -- 发布时间:2013/12/20 13:04:00 -- 判断一下 nd.level 即可 比如有3层 你只要最后一层
|