获取字符串中的查询结果

时间:2011-04-29 22:00:56

标签: vba

如果我运行查询以从每条记录中选择三个单独的字段。是否有可能在三个单独的字符串中找到每个返回的结果(每个字段一个),以便我可以在vba代码中循环它们?

1 个答案:

答案 0 :(得分:5)

是的,您可以尝试打开Recordset并访问字段值,如集合。

Dim d As DAO.Database
Dim r As DAO.Recordset
Set d = CurrentDb()
Set r = d.OpenRecordset("SQL or TableName")
While Not r.EOF
    Debug.Print r!Field1, r!Field2, r!Field3
    r.MoveNext
Wend
r.Close
Set r = Nothing
Set d = Nothing