| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 只是打开窗口，不执行打开窗口后的代码 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=154687) |
| -- 作者：zhuxinhui -- 发布时间：2020/9/23 12:11:00 -- 只是打开窗口，不执行打开窗口后的代码 Dim btn As WinForm.Button = Forms("应收帐款立帐").Controls("Button1") \'模拟点击窗口控件 btn.PerformClick() Forms("凭证").Open() MessageBox.Show("1") Dim bt As WinForm.Button = Forms("凭证").Controls("Button") \'模拟点击窗口控件 bt.PerformClick() 执行以上代码后：只是打开窗口，不执行打开窗口后的代码，打后凭证窗口后，提示1也没有提示，关闭窗口后才执行提示1，是什么原因不执行呢？
|
| -- 作者：有点蓝 -- 发布时间：2020/9/23 12:15:00 -- "凭证"是模式窗口吧，模式窗口是阻塞式的，和messagebox一样，关闭后才会执行后面的代码 |
| -- 作者：zhuxinhui -- 发布时间：2020/9/23 13:34:00 -- 想打开窗口后，自动生成单据，这个需要转什么模式比较好 |
| -- 作者：有点蓝 -- 发布时间：2020/9/23 13:53:00 -- 把代码放到窗口afterload事件即可 |
| -- 作者：zhuxinhui -- 发布时间：2020/9/23 14:33:00 -- 哦，这个问题搞了我好几天了，多谢了 |