怎樣可以把欄位屬性設定成自動編碼呢?(編號:6732)

請問怎樣可以把欄位屬性設定成自動編碼呢?我嘗試用Autonumber及AutoIncrField也不能做到.
Set dbs = OpenDatabase(TransacPath)
dbs.Execute "CREATE TABLE MyTable (DetailID Autonumber, HeadID double, Qty double, Amount double);"