试试
Filter = iif(e.DataRow.isnull("托运人"), "1=1", "[托运人] = '" & e.datarow("托运人") & "'") & " And " & iif(e.DataRow.isnull("收货人"), "1=1", "[收货人] = '" & e.datarow("收货人") & "'")