以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]下拉窗口节点选择按钮  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=104852)

--  作者:湛江智
--  发布时间:2017/8/7 0:50:00
--  [求助]下拉窗口节点选择按钮

下拉窗口节点选择按钮,选择含上级节点+末端节点,确认的按钮,想要的效果如图片

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:2.rar


图片点击可在新窗口打开查看此主题相关图片如下:2个按钮对应的 效果.png
图片点击可在新窗口打开查看


--  作者:湛江智
--  发布时间:2017/8/7 9:28:00
--  
版主,帮忙上面的2个按钮,代码怎么写了,自己折腾不出来
--  作者:有点甜
--  发布时间:2017/8/7 9:48:00
--  

1、你按钮显示的路径要动态获取?根据什么获取,逻辑是什么?

 

2、参考代码

 

Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
Dim path As String = "中国/广东/广州"
Dim ary() As String = path.split("/")
For i As Integer = 0 To ary.length-1
    For Each nd As WinForm.TreeNode In trv.AllNodes
        If nd.Level = i Then
            If nd.name.contains(ary(i)) Then
                nd.Checked = True
                trv.SelectedNode = nd
            End If
        End If
    Next
Next


--  作者:湛江智
--  发布时间:2017/8/7 10:07:00
--  

之前上传的文件有问题,版主看看这个新上传的了

 1楼的图片所示:左边的按钮要在表:文件夹  的列“门”,下来窗口,选择表:C00组织机构 的列:TreeFullPath  生产的目录树的节点

选择目录树节点后,按2个按钮确认输入单元格:全路径按钮、末端节点

算动态的的吧,对这种目录树不懂

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:3.rar


--  作者:有点甜
--  发布时间:2017/8/7 10:35:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:f.foxdb


--  作者:湛江智
--  发布时间:2017/8/7 11:12:00
--  
ok了,非常感谢
--  作者:湛江智
--  发布时间:2017/8/8 11:32:00
--  
版主,还想实现如下图的效果,怎么实现呢?
图片点击可在新窗口打开查看此主题相关图片如下:多值列,下拉窗口勾选多个,填入单元格实现的效果.png
图片点击可在新窗口打开查看
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:多值列,下拉窗口勾选多个,填入单元格实现的效果.rar


--  作者:湛江智
--  发布时间:2017/8/8 11:49:00
--  
 前辈,帮忙看看单元格,多值从目录树多选,怎么实现了,先谢了
--  作者:有点甜
--  发布时间:2017/8/8 12:29:00
--  

AfterCheckNode事件

 

\'\'\'...
dim s1 as string = ""
dim s2 as string = ""
for each nd as WinForm.TreeNode in e.Sender.AllNodes
    if nd.Checked then
        s1 &= nd.FullName & ","
        s2 &= nd.Name & ","
    end if
next
e.Form.controls("button1").text = "全路径:" & s1.trim(",")
e.Form.controls("button2").text = "末路径:" & s2.trim(",")


--  作者:湛江智
--  发布时间:2017/8/8 23:20:00
--  
 可以了,老大牛