Access穫取錶中字段的標題屬性

在Access中，我們説過錶字段名和錶字段的標題屬性的區彆。《ACCESS錶字段中字段名，標題和説明的區彆》

標題屬性往往能直接顯示該字段的具體含義。所以如何通過錶字段去穫取該字段的標題呢？

如錶“錶1”中，或者字段“toolname”的標題名“工具”

利用DAO自定義一箇穫取字段標題的函數

Public Function GetfldCaption(tblName As String, fldName As String)
    On Error Resume Next
    Dim rs As DAO.Recordset
    Set rs = CurrentDb().OpenRecordset(tblName)
    GetfldCaption = rs(fldName).Properties("Caption")
    rs.Close
    Set rs = Nothing
End Function

Me.Label0.Caption = "錶1的字段“toolname”的標題名是 " & GetfldCaption("錶1", "toolname")