datacolchanging事件,写代码
Dim Result As DialogResultResult = MessageBox.Show("是否确认修改?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)If Result = DialogResult.Yes Then e.Cancel = FalseElse e.cancel = TrueEnd If