Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共13 条记录, 每页显示 10 条, 页签: [1] [2]
[浏览完整版]

标题:关于获取窗体名称问题

1楼
裴保民 发表于:2025/1/7 8:13:00
怎样动态获取打开的窗体名称呀?
2楼
有点蓝 发表于: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
3楼
裴保民 发表于:2025/1/7 15:56:00

图片点击可在新窗口打开查看此主题相关图片如下:screenshot_20250107_155452.png
图片点击可在新窗口打开查看
运行后出现错误

图片点击可在新窗口打开查看此主题相关图片如下:screenshot_20250107_160141.png
图片点击可在新窗口打开查看
怎么窗体名称是空值呢?

图片点击可在新窗口打开查看此主题相关图片如下:screenshot_20250107_160728.png
图片点击可在新窗口打开查看



[此贴子已经被作者于2025/1/7 16:07:43编辑过]
4楼
有点蓝 发表于:2025/1/7 16:08:00
调试技巧:http://www.foxtable.com/webhelp/scr/1485.htm,看哪一句代码出错
5楼
裴保民 发表于: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
怎么获取不了一打开窗体名称呢?是一个空值

6楼
有点蓝 发表于:2025/1/7 16:38:00
空值说明没有窗口打开
7楼
裴保民 发表于:2025/1/7 16:38:00
窗体已经打开了呀
8楼
有点蓝 发表于:2025/1/7 16:52:00
请上传实例说明
9楼
裴保民 发表于:2025/1/7 17:54:00
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:新建文件夹 (2).rar

10楼
有点蓝 发表于:2025/1/7 20:17:00
测试没有问题,怎么测试会出错?
共13 条记录, 每页显示 10 条, 页签: [1] [2]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .03125 s, 3 queries.