Foxtable(狐表)用户栏目专家坐堂 → [求助]关于窗口取消修改


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

主题:[求助]关于窗口取消修改

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/4/15 11:55:00 [显示全部帖子]

If DataTables("B_Sta").HasChanges Then '如果当前行已经修改过
    If MessageBox.Show("当前数据已经修改过,是否保存当前单据?","提示",MessageBoxButtons.YesNo,MessageBoxIcon.Information)=7 Then '如果按否则删掉本行数据
        DataTables("B_Sta").RejectChanges
        e.form.close
    Else '否则退出
        MessageBox.Show("请点击保存按钮保存","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
        DataTables("B_Sta").save()
        e.Form.close
    End If
End If

 回到顶部