| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- close和open (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=88868) |
| -- 作者：huhu -- 发布时间：2016/8/10 18:12:00 -- close和open 再来一单的buttom按钮代码: Dim shdh As WinForm.TextBox = e.Form.Controls("TextBox1") If shdh.text = "" Then MessageBox.show("请先完成上一单的收货","生成收货单",MessageBoxButtons.OK,MessageBoxIcon.Error) Else e.Form.Close Forms("生产入库").open End If 点击这个按钮后，生产入库的窗口是打开了，但都是灰色的，没有出现界面。
|
| -- 作者：2900819580 -- 发布时间：2016/8/10 19:03:00 -- 应该是生产入库的窗体类型不对。设置一下 |
| -- 作者：大红袍 -- 发布时间：2016/8/10 19:43:00 -- 如果两个都是模式窗口的话，要这样处理
e.Form.baseform.Opacity = 0
e.Form.Close()
Forms("生产入库").Open() |
| -- 作者：huhu -- 发布时间：2016/8/13 9:53:00 -- 是同一个窗口，是独立窗口。 点击再来一单，先把之前的窗口关掉再打开。
|
| -- 作者：Hyphen -- 发布时间：2016/8/13 10:06:00 -- 同一个窗口应该写代码初始化，而不是重复打开。 |