Ms access Access VBA:切换按钮以筛选非空记录

Ms access Access VBA:切换按钮以筛选非空记录,ms-access,vba,Ms Access,Vba,我有一个表单,它使用组合框从查询中选择某些值。我有很多列在很多记录上都是空白的,我希望使用一个切换按钮来过滤查询,只返回某个特定列包含信息的记录,如果没有按下,它只会返回所有记录 例如,假设我有城市、州、国家的列,我可以使用组合框选择Canada以返回查询中加拿大列为国家的所有记录。对于这些记录,如果其中只有一半填写了城市,我是否可以将城市列绑定到一个切换按钮,这样当我按下该按钮时,只返回包含城市列内容的记录,如果不按下该按钮,它将返回所有记录?检查此查询是否有帮助: SELECT city

我有一个表单,它使用组合框从查询中选择某些值。我有很多列在很多记录上都是空白的,我希望使用一个切换按钮来过滤查询,只返回某个特定列包含信息的记录,如果没有按下,它只会返回所有记录


例如,假设我有城市、州、国家的列,我可以使用组合框选择Canada以返回查询中加拿大列为国家的所有记录。对于这些记录,如果其中只有一半填写了城市,我是否可以将城市列绑定到一个切换按钮,这样当我按下该按钮时,只返回包含城市列内容的记录,如果不按下该按钮,它将返回所有记录?

检查此查询是否有帮助:

SELECT
  city,
  state,
  country
FROM
  some_table
WHERE
  city is not null AND
  city <> ''
选择
城市
国家,,
国家
从…起
几张桌子
哪里
城市不是空的
城市“
从TBL\u中选择*无论在何处[城市]“”
如果recordset.eof=true,则
msgbox“记录集中无记录”,仅vbokonly
出口接头
如果结束
recordset.movefirst
当recordset.eof=false时执行
城市=记录集![城市]
如果是“城市”,那么
和我一起
.additem记录集![国家]
以
recordset.movenext
如果结束
环
Select * FROM TBL_WHATEVER WHERE [City] <>"" 

if recordset.eof = true then
    msgbox "No records in recordset",vbokonly
    exit sub
end if

recordset.movefirst

Do while recordset.eof = false
    city = recordset![city]
        if city <>"" then
            with me.combobox1
                .additem recordset![country]
            end with
            recordset.movenext
         end if
loop