ms-access - 如何测试记录集是否为空?一片空白?

标签 ms-access vba

如何测试记录集是否为空?

        Dim temp_rst1 As Recordset
        Dim temp_rst2 As Recordset

        Set temp_rst1 = db.OpenRecordset("SELECT * FROM ORDER_DATA WHERE SKUS_ORDERED = '" & curSKU1 & "' AND [ORDER] = " & curOrder)
        Set temp_rst2 = db.OpenRecordset("SELECT * FROM ORDER_DATA WHERE SKUS_ORDERED = '" & curSKU2 & "' AND [ORDER] = " & curOrder)

        If IsNull(temp_rst1) Or IsNull(temp_rst2) Then MsgBox "null"

我正在根据 select 语句打开几个记录集。如果没有记录,IsNull会返回true吗?

最佳答案

我会检查“文件结束”标志:

If temp_rst1.EOF Or temp_rst2.EOF Then MsgBox "null"

关于ms-access - 如何测试记录集是否为空?一片空白?,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/6793097/

相关文章:

c# - 使用 OLEDB 连接字符串打开 MS Access 并且无权创建 .ldb 锁定文件

vba - 使用MS Access和VBA生成Ms Word文档

sql-server - 在 SQL Server 查询中复制 MS Access "First"函数

excel - 在 excel 中选择范围并使其成为表格以供进一步引用

ms-access - 确定子窗体/子报表是否具有在 MS Access 中加载的窗体或报表

c# - 创建新的数据库并填充另一个数据库

vba - 首次运行时出现 OnAction 运行时错误 "1004"

vba - 是否有将 Excel 文件格式/设置保存到对象的标准过程?

arrays - 将Excel列表转换为数组格式

sql - 在值不为空的地方插入