主题：关闭保存问题~~在线等

 If MessageBox.Show("是否保存?","确认",MessageBoxButtons.OKCancel,MessageBoxIcon.Question) =DialogResult.OK Then
    If DataTables("库存表").HasChanges = True Then
        DataTables("库存表").Save
    Else Forms("库存表").close
    End If
End If
Forms("库存表").close

上述代码有无问题？

如何解决？

我想要的是，点击按钮，出现对话框，是否保存，确认后，如果库存表有变动则保存并关闭，如果点的是取消（没有确认），则不管库存表是否有变动 都直接关闭。