以文本方式查看主题

-  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=172182)
--  作者：witkeylaw
--  发布时间：2021/9/28 12:50:00
--  [求助]遍历窗口控件出错
遍历窗口控件出错，请教如何处理

1、代码
For Each frm As winform.Form In Forms
output.show(frm.name)
Dim fn As String = frm.Name
Dim i As Integer

For Each ctl As WinForm.Control In Forms(fn).Controls
Dim ctlnm As String = ctl.name
If ctlnm > ""
i = i + 1
output.show("当前第 " & i &"个控件名称为: " & ctlnm & " 类型为: " & ctl.Gettype().toString())

End If
Next
Next


2、出错的文件（包括但不限于这些文件）
自定义录入界面之四.table
自定义录入界面之四.foxdb

3、出错信息（遍历“窗口1”就出错）

---------------------------
版本:2021.9.2.1
---------------------------
代码执行出错，错误信息：



System.NullReferenceException: 未将对象引用设置到对象的实例。

   在 UserCode.Test()
---------------------------
确定   
---------------------------
--  作者：jialihaha
--  发布时间：2021/9/28 13:21:00
--  
窗口要打开了，才可以遍历到
--  作者：有点蓝
--  发布时间：2021/9/28 13:53:00
--  
要打开窗口，才能使用里面的控件。由于下拉窗口是无法直接打开的，只能到窗口afterload事件去遍历
--  作者：witkeylaw
--  发布时间：2021/9/29 9:21:00
--  
多谢两位。