主题：[求助]下拉窗口节点选择按钮

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

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:2.rar

此主题相关图片如下：2个按钮对应的 效果.png

版主，帮忙上面的2个按钮，代码怎么写了，自己折腾不出来

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

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

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

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

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

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:3.rar

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:f.foxdb

ok了，非常感谢

版主，还想实现如下图的效果，怎么实现呢？
此主题相关图片如下：多值列，下拉窗口勾选多个，填入单元格实现的效果.png

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:多值列，下拉窗口勾选多个，填入单元格实现的效果.rar

 前辈，帮忙看看单元格，多值从目录树多选，怎么实现了，先谢了

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(",")

 可以了，老大牛