[求助]窗口问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]窗口问题

共有4334人关注过本帖树形打印复制链接主题：[求助]窗口问题

mxko

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：一尾狐帖子：463 积分：3792 威望：0 精华：0 注册：2013/2/20 11:07:00

[求助]窗口问题 发帖心情

Post By：2013/5/24 16:45:00 [只看该作者]

如何做到：弹出的窗口必须关闭后才可以切换到其它窗口？

[此贴子已经被作者于2013-5-24 17:45:56编辑过]

XYT

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：六尾狐帖子：1418 积分：7167 威望：0 精华：0 注册：2013/3/18 8:37:00

Post By：2013/5/24 16:47:00 [只看该作者]

用模式窗口

mxko

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：一尾狐帖子：463 积分：3792 威望：0 精华：0 注册：2013/2/20 11:07:00

Post By：2013/5/24 16:48:00 [只看该作者]

非常感谢

mxko

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：一尾狐帖子：463 积分：3792 威望：0 精华：0 注册：2013/2/20 11:07:00

Post By：2013/5/24 17:46:00 [只看该作者]

我将弹出窗口Control7改为模式窗口后

写这段代码有错

Dim FN As String = e.Form.Name
Dim CN As String = e.Form.Controls("TB_dttable").Value
With Forms("Control7")
    .Open
    .Controls("FormName").Text = FN
    .Controls("ControlName").Text = "TB_dttable"
    .Controls("Label1").Text = "明细表"
    .Controls("TextBox1").Value = CN

End With