查询返回Microsoft Access中的表中的字段名称

问题描述:

我认为有一种方法可以在ms访问中执行此操作,我可以在名为'Employees'的表上运行查询,例如它将返回字段名称即EmpID,FirstName,Surname标题,而不是字段的值,例如13,约翰,杜伊。查询返回Microsoft Access中的表中的字段名称

这可能在MS访问?

问候,

forestgump

+0

重复这个? http://*.com/questions/18673858/get-column-names-from-a-table-in-an-access-database-using-vb-net – 2014-09-19 14:39:44

您将需要一个Recordset对象玩这个。不知道你打算如何使用。但是,这段代码将打印到直接窗口。

有关如何使用记录的详细信息 - http://www.utteraccess.com/wiki/index.php/Recordsets_for_Beginners

Public Sub printFieldName(inputTable As String) 
    'Takes a TableName as input and prints the field names 
    '  of that Table. 
    Dim tmpRS As DAO.Recordset 
    Dim fCtr As Long 

    Set tmpRS = CurrentDB.OpenRecordset("SELECT * FROM " & inputTable) 

    For fCtr = 0 To tmpRS.Fields.Count - 1 
     Debug.Print tmpRS.Fields(fCtr).Name 
    Next 

    Set tmpRS = Nothing 
End Sub 

用法是,

printFieldName "TransactionTable" 
FirstName 
LastName 
manTeam 
probEnd 
department 

如果你只是想要一个列表,打开表,选择第一行,将它复制并将其粘贴到Excel中。字段名称和第一条记录将被粘贴。删除第一条记录。复制包含字段名称的行并粘贴,转置以获取列表。如果你需要动态信息,但显然不可用,但如果你需要一个列表来处理,这会非常有用。