又要麻烦各位了!
我在一个表单里有combo1,combo2,grid1,comm1.
form1的int 里:set date short(年月日显示为yyyy-mm-dd)及构成了一个lsb(临时表)
combo1:rowsounrce='select year(rq)distinct from zjtzb into cursor combo1 '     rowxounrceType='3-SQL语句'  显示zjtzbg表中rq字段中的年份供选择
combo2:rowsounrce='select month(rq)distinct from zjtzb into cursor combo1 '     rowxounrceType='3-SQL语句' 显示zjtzbg表中rq字段中的月份供选择
grid1 afterchang: select zjtzb
                  thsiform.refresh
comm1意思是当zjtzb中的rq 字段中的年份与combo1显示的年份相同以及rq 字段中的月份与combo2 显示的月份相同时查询出来生成一个临时表lsb在grid1中显示

我写了一下程序就是日期格式问题:
a1=ctod()
a2=ctod()

thisform.grid1.recordsource=NULL

(*临时表
  * creat cursor lsb ( rq1 d(8),dlb1 L(1), je1 c(10),xlb1 c(10),jsr1 c(8), bj1 c(50)))
在表单的int中写了

use lsb in 0
sele * from zjtzb where year(rq)=a1 and rq=month(a2) **执行选择语句：
sele * from zjtzb where year(rq)=a1 and rq=month(a2) into table lsb
**然后重新设置数据源：
thisform.grid1.recordsource='lsb'
go top
thisform.refresh

一团乱。。。。

王建平麻烦你了

明白我的意思吗?

列表框源不是那个日期字段吗？为啥还用a1=ctod()呢？

你杂把我的姓名拼出来了。。。。

上传表格和表单

因为这种名字太普遍咯，哈哈哈哈~