[求助]请教一个主窗口的问题：主窗口绑定一张表，在对该表进行了修改后，切换或关闭主窗口时，提示保存信息，该怎么实现 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]请教一个主窗口的问题：主窗口绑定一张表，在对该表进行了修改后，切换或关闭主窗口时，提示保存信息，该怎么实现

共有7503人关注过本帖树形打印复制链接主题：[求助]请教一个主窗口的问题：主窗口绑定一张表，在对该表进行了修改后，切换或关闭主窗口时，提示保存信息，该怎么实现

zhuying0718

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：70 积分：765 威望：0 精华：0 注册：2013/4/4 13:10:00

[求助]请教一个主窗口的问题：主窗口绑定一张表，在对该表进行了修改后，切换或关闭主窗口时，提示保存信息，该怎么实现 发帖心情

Post By：2013/4/7 10:07:00 [只看该作者]

请教一个主窗口的问题：主窗口绑定一张表，在对该表进行了修改后，切换或关闭主窗口时，提示保存信息，该怎么实现

夕然

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：三尾狐帖子：619 积分：3656 威望：0 精华：1 注册：2012/6/13 22:00:00

Post By：2013/4/7 10:29:00 [只看该作者]

如果你的窗口表绑定的是主表的话，可以按照下面的方式做

Dim Result As DialogResult

With Tables("表")
    If .Current.DataRow.RowState = DataRowState.Unchanged Then '如果当前行未曾修改
    e.Form.Close
    Return
Else

    Result = MessageBox.Show("该记录没有保存,是否放弃?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
    If Result = DialogResult.no Then
        Return

    End If

    .Current.Reject()
    'MessageBox.Show("已经撤销修改!:) " ) '& .Position & "|" & .Rows.Count )