主题：代码求助

简单，你看看这个事件：

http://www.foxtable.com/help/topics/1640.htm

If e.Row.Checked = True Then
    Dim Result As DialogResult
    Result = MessageBox.Show("确定需要更改数据吗?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
    If Result = DialogResult.yes Then
        e.Row.Locked = False
    Else
        e.Row.Checked = False
    End If
End If