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

此主题相关图片如下:screenshot_20250107_155452.png

运行后出现错误

此主题相关图片如下:screenshot_20250107_160141.png

怎么窗体名称是空值呢?

此主题相关图片如下:screenshot_20250107_160728.png

[此贴子已经被作者于2025/1/7 16:07:43编辑过]
Dim ctm As String =""
For Each frm As WinForm.Form In Forms
If frm.Opened Then
ctm = frm.name
msgbox(ctm)
End If
Next
怎么获取不了一打开窗体名称呢?是一个空值