office交流網--QQ交流群號

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

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

access利用DAO設置數據錶的主鍵

2020-06-28 08:00:00
tmtony8
原創
752

access數據錶中,建議都設置一下主鍵。旣可以保證實體的完整性,也加快數據庫的操作速度。

在access中,添加主鍵可以用點擊錶格右鍵,主鍵,看到的鑰匙符號就是主鍵瞭。

也可以通過代碼動態添加主鍵

On Error GoTo 齣錯
    Dim db As DAO.Database
    Dim tb As DAO.TableDef
    Dim ind As DAO.Index
    Set db = CurrentDb
    Set tb = db.TableDefs("員工信息")
    Set ind = tb.CreateIndex("主鍵")  '創建主鍵索引
    ind.Fields.Append ind.CreateField(txt1) '爲索引添加主鍵字段
    ind.Primary = True
    tb.Indexes.Append ind  '將新建的索引添加到索引對象集閤中去
    MsgBox "恭喜,主鍵創建成功!" 
    Exit Sub
齣錯:
    MsgBox Err.Description, , "錯誤"


    分享