Foxtable(狐表)用户栏目专家坐堂 → BeforeClose


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

主题:BeforeClose

帅哥哟,离线,有人找我吗?
huhu
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

Dim tg As WinForm.RadioButton = e.Form.Controls("通过")
Dim wg As WinForm.RadioButton = e.Form.Controls("未过")
If tg.Checked = False And wg.Checked = False Then
    MessageBox.show("请出库品管校验","不能关窗口",MessageBoxButtons.OK,MessageBoxIcon.Error)
    e.Cancel = True-----设置为true,窗口仍然能关掉。这是咋回事?
End If
For Each dr As DataRow In DataTables("配货扫描").DataRows
    If dr.Isnull("SN") Then
        dr.Delete
        dr.save
    End If
Next

 回到顶部
帅哥哟,离线,有人找我吗?
有点色
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/4/12 17:30:00 [只看该作者]

msgbox有弹出吗?你的这个窗口是主窗口的话,不会触发你的beforeClose事件。

 

如果msgbox弹出了,你尝试再编辑一次beforeClose事件,确定,运行窗口,看有没有问题。


 回到顶部
帅哥哟,离线,有人找我吗?
huhu
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

哦。发布之后就是可以的。
不能关掉可能是我用开发者的打开的窗口。

 回到顶部
帅哥哟,离线,有人找我吗?
有点色
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/4/12 19:26:00 [只看该作者]

以下是引用huhu在2017/4/12 18:55:00的发言:
哦。发布之后就是可以的。
不能关掉可能是我用开发者的打开的窗口。

 

我测试了一下,没有问题,你升级到最新版,然后测试。

 

如果有问题,上传实例。


 回到顶部