窗体sqltable表  只有一条数据的时候  任何加载条件都显示这一条数据  当有两条及以上数据的时候  才会按加载条件正确显示数据  怎么解决呢？

窗体表设计时sel ect 语句  sel e ct * from {说明与报告} where 加载类别=\'民主生活会说明\'

窗体完全打开后事件代码

Dim br As DataRow=DataTables(e.Form.Name & "_table1").find("身份证号=\'" & vars("身份证号") & "\'and 加载类别 = \'民主生活会说明\'")
If br IsNot Nothing  Then
    Tables(e.Form.Name & "_table1").Filter="身份证号=\'" & vars("身份证号") & "\'and 加载类别 = \'民主生活会说明\'"
    Tables(e.Form.Name & "_table2").Filter="身份证号=\'" & vars("身份证号") & "\'and 文件类别 = \'民主生活会说明\'"
End If

运行时候出现一个问题：

如果当前Tables(e.Form.Name & "_table1") 只有一条数据的时候  无论vars("身份证号") 是什么内容  都是只显示这一条数据

当Tables(e.Form.Name & "_table1") 大于1条数据的时候  才会根据vars("身份证号") 及类别  来正确显示数据行

麻烦老师帮我看看  我上述是不是写法不对