我想在单元格“完成”打钩后相关表锁定记录，在打钩时有提示出现，警告打完钩后数据将会被锁定，我在表格属性中的“DAtaColchanged”里写了如下语句，但是如果我选择“否”的话执行后就会重复提示。原因是如果我不加语句“Tables("业务记录总表").Current("完成") = False”的话，完成如论如何都已打钩，但是加了这句后狐表由于cell的内容有一次changed又要重新再来提示遍，请问大侠如何解决，有什么简易好办法解决这个问题，谢谢！
Dim Result As DialogResult
Result = MessageBox.Show("数据正确吗,是否要锁定记录?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
If Result = DialogResult.Yes Then
DataTables.Save()
DataTables("业务记录总表").ReplaceFor("_locked",e.newvalue,"营业序号='" & e.DataRow("营业序号") & "'")
DataTables("服务明细").ReplaceFor("_locked",e.newvalue,"营业序号='" & e.DataRow("营业序号") & "'")
DataTables("消费明细").ReplaceFor("_locked",e.newvalue,"营业序号='" & e.DataRow("营业序号") & "'")
MessageBox.Show(" 记录已锁定!","提示")
Else
Tables("业务记录总表").Current("完成") = False
MessageBox.Show(" 已放弃锁定记录.","提示")
End If
[此贴子已经被作者于2021/12/1 20:36:21编辑过]
加好友 
发短信
Post By：2021/12/1 20:29:00 [只看该作者]
Post By：2021/12/2 8:44:00 [只看该作者]
