以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 没有选择的话按下就会报错 怎么排除 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=112895) |
-- 作者:yifan3429 -- 发布时间:2018/1/4 20:40:00 -- 没有选择的话按下就会报错 怎么排除 .NET Framework 版本:2.0.50727.5485 Foxtable 版本:2017.12.18.1 错误所在事件:窗口,团队输入,Button1,Click 详细错误信息: 未将对象引用设置到对象的实例。 如果没有选择的话按下就会报错 怎么排除 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 & "|" & nd.Text End If Next e.Form.DropDownBox.Value = s.trim("|") e.Form.DropDownBox.CloseDropdown |
-- 作者:有点甜 -- 发布时间:2018/1/4 20:42: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 & "|" & nd.Text
End If
Next
e.Form.DropDownBox.Value = s.trim("|")
e.Form.DropDownBox.CloseDropdown
|