| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 可多选目录树 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=193237) |
| -- 作者：1234567 -- 发布时间：2024/8/29 8:40:00 -- 可多选目录树 Dim s As String = "" Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1") For Each nd As WinForm.TreeNode In trv.AllNodes \'如果只选择第二层节点，代码如何写？ If nd.Checked Then s = s & vbcrlf & nd.Text End If Next e.Form.DropDownBox.Value = s.trim() e.Form.DropDownBox.CloseDropdown |
| -- 作者：有点蓝 -- 发布时间：2024/8/29 8:45:00 -- http://www.foxtable.com/webhelp/topics/0907.htm For Each nd As WinForm.TreeNode In trv.AllNodes \'如果只选择第二层节点，代码如何写？
If nd.Level=1 andalso nd.Checked Then |
| -- 作者：1234567 -- 发布时间：2024/8/29 8:49:00 -- 第一层节点不显示复选框，只有第二层节点显示复选框，是否可以？ |
| -- 作者：有点蓝 -- 发布时间：2024/8/29 8:59:00 -- 不可以的 |