如何查找Recordset是否为空不在VBA中?

问题描述:

我尝试下面的代码:如何查找Recordset是否为空不在VBA中?

rs5.Open "select Duration from onduty where User_id='" & rs1!User_id & "' and date=#" & Date & "#", cn, adOpenDynamic, adLockOptimistic 

其中rs5rs1被声明为ADODB.Recordset

我需要找到执行查询后rs5是否为空。

+0

你为什么不读文件? “如果数据源没有返回任何记录,则提供程序将BOF和EOF属性都设置为True,并且当前记录位置未定义。如果光标类型允许,仍然可以向该空白Recordset对象添加新数据。 http://msdn.microsoft.com/en-us/library/windows/desktop/ms675544(v=vs.85).aspx –

+0

我是新来的VB和我需要修改一个较早完成的项目,我被约会该项目。由于该项目即将完成,我没有时间阅读文件。 – user2595186

+0

你是什么样的程序员,如果你忽视文档?你可以提供什么担保给你的代码? –

你尝试:

If rs5.EOF Then MsgBox "null" 
+0

是的,我早些时候尝试过。但是错误发生在我工作的程序的另一部分。现在我纠正了它。现在我的程序工作正常。任何方式你的答案是我的问题的答案。所以我接受它。谢谢你的回答,好像你不会回答我会认为我使用了错误的条件。现在对我来说很清楚。 – user2595186