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
怎么获取不了一打开窗体名称呢?是一个空值