主题：节点取值

报错啊.

 不，可，能，报，错

Dim s As String = ""
Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
For Each nd As WinForm.TreeNode In trv.AllNodes
    If nd.Level = 2 AndAlso nd.Checked Then
        s = s & "," & nd.Text
    End If
Next
e.Form.DropDownBox.Value = s.trim(",")
e.Form.DropDownBox.CloseDropdown

此主题相关图片如下：03.png

有图可鉴.

 看13楼

是13楼的,结果如上图.

 有什么问题？

1楼两图都没实现预期结果.

 不理解你什么意思啊，你选择最后一个节点的内容，才会写到表里面去啊

如果选择第一层节点,那第一层结点下的最底层结点的值填到表里.
如果选择第二层节点,那第二层节点下的最底层结点值填到表里.
如果选最底层结点,那直接将最底层值填到表里,其上层节点不可再选.