你的数据库是sqlserver?
那你要把#改成'
flt = "GB402 = '"& e.DataRow("GB402") & "' And GB311 >= '" & fd & "' And GB311 <= '" & ld & "' And [_Identify] <> " & e.DataRow("_Identify")