检查记录是否匹配另一个 MS Access VBA/SQL

Question

我不确定如何通过 VBA 找到匹配的记录。在 SELECT SQL 中，它正在从 table CFRRR 中选择与 program 和 language 字段匹配的记录。在 IF 语句中，我想知道所选记录的 caseid（这也是 CFRRR 中的一个字段）是否与 CFRRR 上另一条记录的 casedid 匹配。我不确定是走 DLookup 还是 Match 的方向。这是我所在的位置：

 strSQL = "SELECT CFRRRID, [Program], [language] FROM CFRRR
 WHERE assignedto Is Null"
    Set rs = db.OpenRecordset(strSQL, dbOpenDynaset)

    If rs.currentrecord.caseid

Answer 1

您正在 SELECTing CFRRRID 并且您想知道 CFRRRID 值是否存在于另一行中同样table。您可以包含一个 DCount 表达式来找出答案。

strSQL = "SELECT CFRRRID, [Program], [language], " & _
    "DCount('*', 'CFRRR', 'CFRRRID=' & CFRRRID) AS CountOfCFRRRID " & _
    "FROM CFRRR WHERE assignedto Is Null"

当计算值 CountOfCFRRRID 大于 1 时，您知道当前 CFRRRID 值存储在另一行中table.

检查记录是否匹配另一个 MS Access VBA/SQL

Checking if record matches another MS Access VBA/SQL

sql

ms-access

vba

ms-access-2010