MS ACCESS 2007 VBA:DAO记录集....如何查看返回集合中的所有"字段"

Jus*_*tin 1 ms-access vba dao ms-access-2007

所以如果我这样做一个SQL语句:

sql = "SELECT * FROM tblMain"

     set rs = currentdb.openrecordset(sql)
Run Code Online (Sandbox Code Playgroud)

我可以用什么方法查看我刚创建的这个集合中的每个"字段名称".我收到一些非常奇怪的错误,说明在此集合中找不到该项目.

我知道该字段存在于表中,当我引用它时,我已经三次检查拼写,并且SQL应该拉动所有内容,但我想看到它.

是否有debug.print方法来查看所有这些字段

谢谢贾斯汀

Dav*_*ton 9

这是其他答案的变体,但我相信使用For/Each循环比使用计数器更好:

  Dim rs As DAO.Recordset
  Dim fld As DAO.Field

  Set rs = CurrentDB.OpenRecordset("SELECT * FROM tblMain")
  For Each fld In rs.Fields
    Debug.Print fld.Name
  Next fld
  Set fld = Nothing
  rs.Close
  Set rs = Nothing
Run Code Online (Sandbox Code Playgroud)


Raj*_*ore 6

您可以遍历记录集的字段集合.

代码是OTTOMH

Dim NumFields as Integer

For NumFields = 0 to rs.Fields.Count -1
    Debug.Print Rs.Fields(NumFields).Name
Next
Run Code Online (Sandbox Code Playgroud)

或者,你可以设置一个断点set rs = currentdb.openrecordset(sql)尽快执行语句,然后右键单击rs,选择添加表并查看整个事情手表窗口.