1 If DataTables("表B").Find("编号 = '" & dr3("编号") & "' And 数量 = '" & dr3("数量") & "'And 日期 = '" & dr3("日期") & "'") Is Nothing Then
大部运行能执行,偶尔不报错
2、If DataTables("表B").Find("编号 = '" & dr3("编号") & "' And 数量 = " & dr3("数量") & " And 日期 = #" & dr3("日期") & "#") Is Nothing Then
帮助上类型,好象这个才规格
狐表,对第一种代码,写时没有严格要求,限制,严谨不够,对开发项目稳定可能会影响