office交流網--QQ交流群號

Access培訓群:792054000         Excel免費交流群群:686050929          Outlook交流群:221378704    

Word交流群:218156588             PPT交流群:324131555

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

2018-01-02 17:12:00
tmtony8
原創
9315

在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")


    分享