在字符串中获取查询结果

Question

如果我运行查询以从每条记录中选择三个独立的字段。是否有可能得到每个返回的结果为三个单独的字符串（每个字段一个），以便我可以在vba代码中遍历它们？

Answer 1

是的，你可以尝试打开一个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