表的字段数据类型-查询语句如何针对该行某字段内容进行筛选

todaynew

在数据表窗体的成为当前事件中写：
dim ssql as string
if isnull(me.ID.value)=true then
    ssql="select * from 表二"
else
    ssql="select * from 表二 where 公司='" & me.公司.value & "'"
end if
me.联系人.RowSource=ssql