Foxtable(狐表) → 用户栏目 → 专家坐堂 → close和open


  共有1787人关注过本帖树形打印复制链接

主题：close和open
帅哥哟，离线，有人找我吗？
huhu
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1165 积分：8129 威望：0 精华：0 注册：2015/3/30 10:44:00 		close和open  发帖心情 Post By：2016/8/10 18:12:00 [只看该作者]

再来一单的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
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：六尾狐 帖子：1327 积分：9648 威望：0 精华：0 注册：2015/6/30 8:46:00 		  发帖心情 Post By：2016/8/10 19:03:00 [只看该作者]

应该是生产入库的窗体类型不对。设置一下

 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2016/8/10 19:43:00 [只看该作者]

如果两个都是模式窗口的话，要这样处理

 

e.Form.baseform.Opacity = 0
e.Form.Close()
Forms("生产入库").Open()
 回到顶部
帅哥哟，离线，有人找我吗？
huhu
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1165 积分：8129 威望：0 精华：0 注册：2015/3/30 10:44:00 		  发帖心情 Post By：2016/8/13 9:53:00 [只看该作者]

是同一个窗口，是独立窗口。
点击再来一单，先把之前的窗口关掉再打开。
 回到顶部
帅哥哟，离线，有人找我吗？
Hyphen
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：狐神 帖子：5015 积分：25363 威望：0 精华：0 注册：2015/8/18 9:21:00 		  发帖心情 Post By：2016/8/13 10:06:00 [只看该作者]

同一个窗口应该写代码初始化，而不是重复打开。

 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.03320 秒, 4 次数据查询