| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 语句执行方面问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=80017) |
| -- 作者：lzzhx -- 发布时间：2016/1/14 8:50:00 -- 语句执行方面问题 Forms("登录窗口").Open \'正常登录后zfsb=1 MessageBox.Show("zfsb= " & zfsb) If zfsb<>001 Then \'不加载数据 Return Else Forms("主页").Open MainTable = Tables("主页") End If 这段代码在AfterOpenProject中，正常登录后，zfsb=1，可代码执行后，消息框显示zfsb=“”，主页也不加载，若不加IF语句，将Forms("主页").Open直接放在Forms("登录窗口").Open后面，则登录窗口还没有关时，Forms("主页")里的代码就执行了，请教各位老师，该如何做？
|
| -- 作者：lzzhx -- 发布时间：2016/1/14 9:03:00 -- 请老师们看看 |
| -- 作者：Hyphen -- 发布时间：2016/1/14 9:38:00 -- 说明zfsb没有正确赋值 |
| -- 作者：lzzhx -- 发布时间：2016/1/14 9:58:00 -- zfsb确实赋值了，只不过是Forms("登录窗口").Open语句后面的语句在【登录窗口】还没有关闭的时候就执行了 |
| -- 作者：Hyphen -- 发布时间：2016/1/14 10:15:00 -- 把Forms("登录窗口")设置成模式窗口 |
| -- 作者：lzzhx -- 发布时间：2016/1/14 10:38:00 -- 好了，谢谢老师 |