Question

我认为有一种方法可以在ms访问中执行此操作，例如我可以在名为“Employees”的表上运行查询，它将返回字段名称，即EmpID，FirstName，Surname title，而不是值这个领域，例如13，约翰，母鹿。

这可以在ms访问吗？

问候，

forestgump

Answer 1

您将需要一个Recordset对象来玩这个。不确定你打算如何使用。但是这段代码会将它打印到即时窗口。

有关如何使用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

Answer 2

如果您只想要一个列表，请打开表格，选择第一行，复制并粘贴到Excel中。将粘贴字段名称和第一条记录。删除第一条记录。使用字段名称复制行并粘贴，转置以获取列表。如果您需要动态信息，但如果您需要一个可以使用的列表，那么显然不可用。

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

2 个答案: