rs.Open "select sum(fcishu) from [zz_user] where fcishu>0 and ctime>=# " & Text1.Text & "#", CONN, adOpenDynamic
lbjg.Caption = RcAdo.Fields(0)
我是按日期返回数量和的..然后给标签,当查询在范围内时,没有错...如果不在范围内时就出错?

没看明白什么意思...

可能你的数据库里无记录或某记录的某字段为空！

数据库没资料
把你数据库里面的那字段给设置成 允许空什么什么的东西 反正就那意思

当无与查询条件相符的记录时,sum(fcishu)是null值.
if rs.bof and rs.eof then
lbjg.Caption ="0"
else
lbjg.Caption = RcAdo.Fields(0)
end if

谢谢..问题解决了!!!