怎样判断结果集是否为空rsQues.Open "select * from userResult where portablephone='" & phone & "'", conQues, 3, 3
'如果该手机号码存在
If rsQues.BOF <> rsQues.EOF Then <--------此处老相等
....
end if
'如果该手机号码存在
If rsQues.BOF <> rsQues.EOF Then <--------此处老相等
....
end if
msgbox "无此记录!",48,"提示"
exit sub
else
...
end if
if not Rs.eof then
'有记录做相应处理
while not rs.eof
'
rs.movenext
wend
esle
msgbox "无满足条件的记录!"
end if