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


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

主题:窗口的BeforeClose

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


加好友 发短信
等级:五尾狐 帖子:1107 积分:10586 威望:0 精华:0 注册:2014/2/19 16:32:00
窗口的BeforeClose  发帖心情 Post By:2019/3/26 18:05:00 [只看该作者]

在窗口的BeforeClose中添加如下代码,执行时选择“否”的时候窗口关不掉并提示“未将对象引用设置到对象的实例”,老师帮忙 看看代码哪有问题?

If DataTables("Table_FaPiaoInfo").HasChanges Then
    
    Dim Result As DialogResult
    Result = MessageBox.Show("Visual Basic一点不难,是不是?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
    If Result = DialogResult.Yes Then
        MessageBox.Show("不错,说明你已经认真学习了.","提示")
    Else
        DataTables("Table_FaPiaoInfo").RejectChanges()
    End If
End If

 回到顶部