设计查询表单时出现个问题
我的查询表单里有个组合框,可以选择年份,我设计一个查询按钮代码如下
SELECT zrqk
a=VAL(thisform.combo1.Value)
b= "cs_n=a "
SET FILTER TO
SET FILTER TO &b
count to rs
thisform.text4.value=rs
thisform.list1.SetFocus
thisform.list1.Requery
thisform.Refresh
我的想法是在组合框选择年份,点击查询按钮,在列表框中显示在该年出生的人员名单
现在在组合框里选择完年份后,点击查询按钮,列表框里有时不显示,点击后显示的人员也不对,但是统计人数的 rs 的变量结果是对的,点击查询按钮在状态栏里会提示 "筛选器已删除 ", 很奇怪 ,如果我把查询条件换成常数
set filter to cs_n=1976
则列表框正确显示查询结果
改了快一天了,也没有改好,请高手指教!!!
[解决办法]
list的RECORDSOURCE重新设置没有？
[解决办法]
测试了一下，应该没有问题
a=thisform.combo1.Value
b= "cs_n= "+a
or
a=val(thisform.combo1.Value)
b= "cs_n= "+allt(str(a))
SET FILTER TO
SET FILTER TO &b
thisform.list1.Requery
