请问各位这个代码怎样写

半夜罗　发表于：2016-12-06 18:58:59 　

请问各位大神，在进行数据输入时，难免会出现一些重复，但有的重复数据是允许输入的（如销售单中主窗体上的合计金额与子窗体上的合计金额，有时明细不同，但金额相同），就会出现允许与不许的选择。请教如何完成，谢谢！

If DCount("*", "销售单", "[日期] & [客户代码] & [金额]='" & Me.日期 & Me.客户代码 & Me.金额 & "'") > 0 Then '如果有相同的

If MsgBox("该记录已经存在，您确认要保存吗?", vbOKCancel + vbInformation, "提示") = vbOK Then '选择允许或禁止

1、允许重复时继续程序

2、禁止重复时中断程序

End If
End If

仙来发表于：2016-12-07 10:44:27

If DCount("*", "销售单", "[日期] & [客户代码] & [金额]='" & Me.日期 & Me.客户代码 & Me.金额 & "'") > 0 Then '如果有相同的

If MsgBox("该记录已经存在，您确认要保存吗?", vbOKCancel + vbInformation, "提示") = vbOK Then '选择允许或禁止

执行保存代码

else

exit sub

End If
End If

半夜罗发表于：2016-12-07 18:51:29

谢谢！！！！！！！！！！

总记录：2篇页次：1/1 9 1 :

Access交流中心