- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 关于获取窗体名称问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=194700)
-- 发布时间：2025/1/7 8:13:00
-- 关于获取窗体名称问题
怎样动态获取打开的窗体名称呀？
-- 发布时间：2025/1/7 8:37:00
--
http://www.foxtable.com/webhelp/topics/0703.htm
For Each frm As WinForm.Form In Forms
If frm.Opened Then
msgbox(frm.name)
End If
Next
If frm.Opened Then
msgbox(frm.name)
End If
Next
-- 发布时间：2025/1/7 15:56:00
--
此主题相关图片如下：screenshot_20250107_155452.png
运行后出现错误
此主题相关图片如下：screenshot_20250107_160141.png
怎么窗体名称是空值呢？
此主题相关图片如下：screenshot_20250107_160728.png
[此贴子已经被作者于2025/1/7 16:07:43编辑过]
-- 发布时间：2025/1/7 16:08:00
--
调试技巧：http://www.foxtable.com/webhelp/scr/1485.htm，看哪一句代码出错
-- 发布时间：2025/1/7 16:12:00
--
Dim ctm As String =""
For Each frm As WinForm.Form In Forms
If frm.Opened Then
ctm = frm.name
msgbox(ctm)
End If
Next
怎么获取不了一打开窗体名称呢?是一个空值
-- 发布时间：2025/1/7 16:38:00
--
空值说明没有窗口打开
-- 发布时间：2025/1/7 16:38:00
--
窗体已经打开了呀
-- 发布时间：2025/1/7 16:52:00
--
请上传实例说明
-- 发布时间：2025/1/7 17:54:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:新建文件夹 (2).rar |
-- 发布时间：2025/1/7 20:17:00
--
测试没有问题，怎么测试会出错？