怎样检查RS的数据有没有！！！！！！！！！！！！

[denyu1]

比如我用以下程序：
RS=CN.EXECUTE（“SELECT INT1 FROM TABLE1 WHERE ZJZH=‘17800000’”）
我想知道RS中是否有数据，也就是是否有符合SELECT 查询条件的结果级

[逍遥的心]

i=0
do while not rs.eof
'做有数据时候的操作
rs.movenext
i=i+1
noop
if i=0 then '无数据'
起到了判断效果

[shanlisong]

If Not (RS.BOF = True And RS.EOF = True) Then
msgbox "有记录"
else
msgbox "无记录"
end if

[titan90]

if rs.eof then
'没记录
else
'有记录
end if

[cosio]

if not rs.eof then

msgbox ""

else

msgbox ""

end if

[denyu1]

rs3 = cn1.Execute("select cjje from cjb where zjzh=" & rs1!zjzh & " and czfs=4")
If Not (rs3.BOF = True And rs3.EOF = True) Then
shjf = shjf + rs3!shjf1
End If
我用的是以上代码：报错为对象不支持改属性或方法
改为rs3 = cn1.Execute("select cjje from cjb where zjzh=" & rs1!zjzh & " and czfs=4")
shjf = shjf + rs3!shjf1
之后就一切OK
是什么原因

[creazyfish]

'先判断一下记录集是否成功打开
if rc3.state=1 then
i=rc3.recordcount
else
msgbox"未连接成功！"
end if

[白发程序猿]

if rs.eof then msgbox "没有数据"

[tliang]

都行。三楼的最简单。

[西雀]

来晚了..

[fengyetianshi]

if rs.eof then
msgbox "没记录"
else
msgbox "有记录"
end if