Foxtable(狐表)用户栏目专家坐堂 → 使用三个按钮的对话框的问题


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

主题:使用三个按钮的对话框的问题

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


加好友 发短信
等级:版主 帖子:1693 积分:12117 威望:0 精华:7 注册:2013/7/11 10:52:00
  发帖心情 Post By:2013/11/17 12:02:00 [显示全部帖子]

因为你发了两个对话框


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


加好友 发短信
等级:版主 帖子:1693 积分:12117 威望:0 精华:7 注册:2013/7/11 10:52:00
  发帖心情 Post By:2013/11/17 12:08:00 [显示全部帖子]

dim a = MessageBox.Show("当前表单已经被修改,是否保存?", "提示", MessageBoxButtons.YesNoCancel, MessageBoxIcon.Question)
If a = DialogResult.Yes Then
    DataTables("入库单").Save()
ElseIf a = DialogResult.Cancel Then
    Return
Else
    DataTables("入库单").RejectChanges() '取消改变
End If

 回到顶部