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

Question

如何将查询结果提供给访问中的msgbox？

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可能更容易，这一切都取决于您想要返回的内容以及从哪里返回。

Answer 2

我不确定我理解，但是要设置消息框中显示的文字，您可以致电：

MsgBox strYourTextHere

Here's the documentation用于Access 2007的MsgBox函数。