Dim fil As String = "项目编号 = '" & dr("项目编号") & "' And 旁站类别 = '" & dr("旁站类别") & "' And 旁站编号 Like '" & lb & "%' And [_Identify] <> " & dr("_Identify")