• <strong id="yd969"><track id="yd969"></track></strong>

    <li id="yd969"></li>
  • <rp id="yd969"><object id="yd969"></object></rp>
  • office交流網--QQ交流群號

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

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

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

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

    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, , "錯誤"


      分享