主题：[求助]退出按钮

我想在窗口设计一个退出按钮，点击时提示 保存后 退出 或者 不保存 返回修改，或者 不保存退出。

怎么用代码实现？谢谢！

论坛迁移，数据丢了。上次有个大侠给了代码

If DataTables("表A").HasChanges Then
    Dim Result As DialogResult
    Result = MessageBox.Show("保存?", "提示", MessageBoxButtons.YesNoCancel , MessageBoxIcon.Question)
    If Result = DialogResult.Yes Then
        DataTables("表A").Save
    ElseIf Result = DialogResult.No Then
        DataTables("表A").RejectChanges
    ElseIf Result = DialogResult.Cancel
        e.Cancel = True
        Return
    End If
End If