以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 为什么不能在关闭一个窗口的时候打开另外一个窗口? (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=41466) |
||||
-- 作者:yacity -- 发布时间:2013/10/19 22:39:00 -- 为什么不能在关闭一个窗口的时候打开另外一个窗口? 如图 1、打开软件后,打开菜单 销售信息---销售开单。这时候打开 销售录入 窗口 2、录入销售信息,然后点击 过账打印 3、这时候出来 打印出库单 窗口。点击“打印”按钮开始打印。click 事件如下: e.Form.Page.TopMargin = 0 Dim doc As PrintDoc = e.Form.GernatePrintDoc() Forms("销售录入").open() Forms("打印出库单").close() 可是为什么Forms("销售录入").open()不执行? 把Forms("销售录入").open() 放到 销售录入窗口 的beforeclose 和afterclose 事件中都不行。
[此贴子已经被作者于2013-10-19 23:12:54编辑过]
|
||||
-- 作者:yacity -- 发布时间:2013/10/19 22:41:00 -- 另外还有奇怪的问题 1、打开“出货单”表 2、点击“出货单” 列,弹出“查看出货单”窗口。(这个窗口几乎是和“打印出库单”的窗口一模一样) 3、点击“打印”按钮,为什么这时候 Forms("销售录入").open() 可以执行?
开发密码666 [此贴子已经被作者于2013-10-20 13:09:35编辑过]
|
||||
-- 作者:逛逛 -- 发布时间:2013/10/19 22:47:00 -- 把他俩换个次序。 Forms("销售录入").open() Forms("打印出库单").close() [此贴子已经被作者于2013-10-19 22:47:40编辑过]
|
||||
-- 作者:yacity -- 发布时间:2013/10/19 23:06:00 -- 一样不行的! [此贴子已经被作者于2013-10-19 23:13:23编辑过]
|
||||
-- 作者:yacity -- 发布时间:2013/10/19 23:15:00 -- 以下是引用逛逛在2013-10-19 22:47:00的发言:
把他俩换个次序。 Forms("销售录入").open() Forms("打印出库单").close() [此贴子已经被作者于2013-10-19 22:47:40编辑过] 一样不行的。你下载来试试? |
||||
-- 作者:有点甜 -- 发布时间:2013/10/19 23:18:00 -- 你打开的这个窗口时模式窗口,打开以后,后面的代码在你关闭模式窗口的时候才会执行。 你把Forms("销售录入").open()写到窗口关闭后事件里去
|
||||
-- 作者:yacity -- 发布时间:2013/10/19 23:48:00 -- 以下是引用有点甜在2013-10-19 23:18:00的发言:
你打开的这个窗口时模式窗口,打开以后,后面的代码在你关闭模式窗口的时候才会执行。 你把Forms("销售录入").open()写到窗口关闭后事件里去
销售录入 和 查看出库单 两个窗口都是模式窗口,为什么 查看出库单 窗口 可以执行Forms("销售录入").open() 而 销售录入 窗口不能执行 另外把Forms("销售录入").open() 放到 销售录入窗口 的beforeclose 和afterclose 事件中都不行。 [此贴子已经被作者于2013-10-19 23:53:32编辑过]
|
||||
-- 作者:lsy -- 发布时间:2013/10/20 8:23:00 -- 呵呵呵,哈哈哈。888 问题解决了:
[此贴子已经被作者于2013-10-20 8:24:09编辑过]
|
||||
-- 作者:yacity -- 发布时间:2013/10/20 13:13:00 -- 以下是引用lsy在2013-10-20 8:23:00的发言:
呵呵呵,哈哈哈。888 问题解决了:
[此贴子已经被作者于2013-10-20 8:24:09编辑过]
不行。为什么点“打印”以后 打开的窗口变成这样了。根本没办法输入。 而且原来输入的数据根本都没有保存。
此主题相关图片如下:5.jpg |
||||
-- 作者:有点甜 -- 发布时间:2013/10/20 20:42:00 -- 我测试了一下,只要把 销售录入 的打印按钮的两行代码换一下位置,就可以了的哦。 换成 Forms("销售录入").Close() Forms("打印出库单").Open() 参看出货单的代码 Forms("打印出库单").close() Forms("销售录入").open() |