后面日期后面多了一个“flt = 类别 & " = '" & e.DataRow("类别") & "' And 日期 >= #" & fd & "# And 日期 <= #" & ld & "# And [_Identify] <> " & e.DataRow("_Identify")
或是试试
flt = 类别 & " = '" & e.DataRow("类别") & "' And 日期 >= #" & fd & "# And 日期 <= #" & ld & "# And [_Identify] <> '" & e.DataRow("_Identify") & "'"
[此贴子已经被作者于2024/9/9 9:40:27编辑过]