ms-access - 将 Eval() 与 DAO.Recordset 一起使用 - 可能吗？

Question

我正在使用基于 SQL 查询(在 MS Access 中)的 DAO.recordset(称为 rs2)。调用记录集中的各个属性工作得很好，如下所示:

strName = rs2!Name
strDescr = rs2!Descr

我正在尝试使用 Eval() 函数想出一种更通用的方法来通过变量引用属性，但没有成功。

这样的事情有可能吗？

strAttr = "Name"
strResult = Eval("rs2!" & strAttr)

有什么建议可以完成吗？

Answer 1

Eval() 由 Access 表达式服务计算。而且该服务不了解 VBA 变量，包括对象变量，例如 rs2 记录集。

但我认为您不需要像 Eval() 这样的东西来获得您想要的。使用 strAttr 引用记录集的 .Fields 集合中的命名字段。

strAttr = "Name"
strResult = rs2.Fields(strAttr).Value