Access刪除索引

前麵我們講述過創建索引《access用DAO創建索引》

索引雖然可以提高搜索速度，但是索引不是越多越好的

如何刪除索引呢？

1. 手動刪除

打開錶設計視圖，在設計-索引，把索引刪除卽可。

2. 用DAO代碼刪除

Private Sub 刪除索引_Click()
On Error GoTo 索引
    Dim db As DAO.Database
    Dim tb As DAO.TableDef
    Set db = CurrentDb
    Set tb = db.TableDefs("員工信息")
    '刪除索引
    tb.Indexes.Delete "索引"
    MsgBox "索引刪除成功！" 
    Exit Sub
索引:
    MsgBox Err.Description, , "齣錯"
End Sub