请问：在代码里面怎么判断一个SQL查询返回的是没有记录的查询？

nplgacce

请问：在代码里面怎么判断一个SQL查询返回的是没有记录的查询？

我的一个窗体中有段代码：我输入表中没有的值的时候会出错。

        sSql = "SELECT * FROM DaoTest WHERE [DaoTest].[cDaima] LIKE '" & Trim(txt1.Text) & "*'"
        Me.RecordSource = sSql

我的想法是：如果我在TXT1中输入了错误的值，那么查询回来就没有记录了？怎么才能判断这个SSQL返回的值到底有没有记录？如果没有，怎么才能写个MSGBOX（）函数提示没有返回的记录，再让txt1获得焦点？

先谢谢了。

[此贴子已经被作者于2005-12-7 22:26:09编辑过]

tz-chf

先判断txt1.Text的值，再sql

falex

dim rst as recordset

set rst=currentdb.openrecordset(ssql)

if rst.recordcount>0 then

Me.RecordSource = sSql

else

msgbox "记录数为0"

end if

肯定没问题。呵呵！