以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]层级树节点名称  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=177714)

--  作者:miaoqingqing
--  发布时间:2022/5/31 21:08:00
--  [求助]层级树节点名称
Dim trv  = e.Form.Controls("LayersTree1").basecontrol
Dim p As String = "\\(\\w+(?=\\))\\)"
Dim str = System.Text.RegularExpressions.Regex.Replace(trv.Selectednode.fullpath, p ,"")

msgbox(str)

上面代码,层级树 str,层级树被忽略掉了(括号中的文字),数字,只有中文
求助不忽略 括号及括号中的中文,及后面的阿拉伯数字

--  作者:有点蓝
--  发布时间:2022/5/31 21:13:00
--  
请举例说明,比如什么字符串,希望得到什么结果
--  作者:miaoqingqing
--  发布时间:2022/5/31 21:21:00
--  回复:(有点蓝)请举例说明,比如什么字符串,希望得...

图片点击可在新窗口打开查看此主题相关图片如下:(高变更)丢失.png
图片点击可在新窗口打开查看

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:丢失括号及里面文字.foxdb

括号及里面文字(高变更)丢失和后面的数字丢失,求助不丢失(高变更)

[此贴子已经被作者于2022/5/31 21:26:58编辑过]

--  作者:有点蓝
--  发布时间:2022/5/31 21:30:00
--  
没看懂。比如双击【32-a栋】这个节点,希望得到什么结果?
--  作者:miaoqingqing
--  发布时间:2022/5/31 21:50:00
--  回复:(有点蓝)没看懂。比如双击【32-a栋】这个节点...
adsas(这个)ad暗色123\\32-A栋 楼20210312(高变更)平面图新
希望得到上面一二级节点的全部文字
双击时窗口str显示的文字:  adsas(这个)ad暗色123\\32-A栋 楼20210312(高变更)平面图新,(高变更)丢失了

--  作者:有点蓝
--  发布时间:2022/5/31 22:03:00
--  
直接取路径就行了,搞那么多花样干啥

Dim trv  = e.Form.Controls("LayersTree1").basecontrol
msgbox(trv.Selectednode.fullpath)