MS-ACCESS:在消息框中显示查询结果

Question

如何将查询结果输入到 Access 中的消息框中？

Answer 1

您可能希望使用记录集。

Dim rs As DAO.Recordset

Set rs=CurrentDB.OpenRecordset("NameOfQuery_Table_Or_SQLString")

If Not rs.EOF Then
   MsgBox "Hi, the first record, first field is " & rs.Fields(0)
End if

如果您希望将所有记录返回到字符串，也可以使用 ADO 记录集。

使用 DLookUp 可能会更容易，这完全取决于您想要返回什么以及从哪里返回。