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


  共有1795人关注过本帖平板打印复制链接

主题: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

点击这个按钮后,生产入库的窗口是打开了,但都是灰色的,没有出现界面。

 回到顶部