在 Visual Basic 中設定 Data Access Objects 的屬性
適用於：Access 2013 | Access 2016
資料存取物件 (Data Access Objects (DAO)) 可讓您利用 Visual Basic 處理資料庫的結構及其所包含的資料。 許多 DAO 物件會對應至您在資料庫中看到的物件，例如 TableDef 物件會對應至 Microsoft Access 資料表。 Field物件會對應至資料表中的欄位。
您能為 DAO 物件設定的屬性，大部分都是 DAO 屬性。 這些屬性是由 Microsoft Access 資料庫引擎所定義，而且其設定的方法與任何包含 Access 資料庫引擎的應用程式相同。 某些您可以為 DAO 物件設定的屬性是由 Microsoft Access 所定義，而 Access 資料庫引擎不會自動辨識這些屬性。 設定 DAO 物件的屬性的方式取決於該屬性是由 Access 資料庫引擎所定義，還是由 Microsoft Access 所定義。
設定 DAO 物件的 DAO 屬性
若要設定由 Access 資料庫引擎所定義的屬性，請以 DAO 階層的格式參照物件。 執行此作業最簡單也最快速的方法是建立代表所需要使用之不同物件的物件變數，並在程式碼的後續步驟中參照這些物件變數。 例如，下列程式碼會建立新的 TableDef 物件，並設定它的 Name 屬性：
Dim dbs As DAO.Database
Dim tdf As DAO.TableDef
Set dbs = CurrentDb
Set tdf = dbs.CreateTableDef
tdf.Name = "Contacts"
設定 DAO 物件的 Microsoft Access 屬性
當您設定由 Microsoft Access 所定義，但卻套用至 DAO 物件的屬性時，Access 資料庫引擎並不會將此屬性自動辨識為有效屬性。 第一次設定此屬性時，必須先建立此屬性，並將它附加至它所套用之物件的 Properties 集合中。 只要屬性位在 Properties 集合中，就可以用和 DAO 屬性相同的方式來設定它。
如果第一次是在使用者介面中設定屬性，該屬性會自動新增到 Properties 集合中，而且您也可以用一般的方式來設定它。
當寫程序來設定被 Microsoft Access 定義的屬性，您應該包含錯誤處理程式碼來驗證您正在設定的屬性已經存在 Properties 集合中。 請參閱關於 CreateProperty 方法的 [說明] 主題或個別的屬性主題來得到更多資訊。
請記住，當您建立屬性時，在您新增它至 Properties 集合之前，您必須正確地指定它的 Type 屬性。 您可以根據對於個別的屬性在 [說明] 主題的設定值區段之中的資訊來決定 Type 屬性。 下列資料表提供了決定 Type 屬性設定值的一些指引。
| 如果屬性設定是 | Type 屬性設定應該是 |
|---|---|
| 字串 | dbText |
| 真 / 假 | dbBoolean |
| 整數 | dbInteger |
下表列出適用於 DAO 物件的部分 Microsoft Access 定義屬性。
| DAO 物件 | Microsoft Access 定義的屬性 |
|---|---|
| 資料庫 | AppTitle、AppIcon、StartupShowDBWindow、StartupShowStatusBar、AllowShortcutMenus、AllowFullMenus、AllowBuiltInToolbars、AllowToolbarChanges、AllowBreakIntoCode、AllowSpecialKeys、Replicable、ReplicationConflictFunction |
| SummaryInfo Container | Title、Subject、Author、Manager、Company、Category、Keywords、Comments、Hyperlink Base (請參閱 [DatabaseName屬性] 對話方塊的[摘要] 索引標籤，可透過選取 [檔案] 功能表上的 [資料庫屬性] 來取得。) |
| UserDefined Container | (請參閱 [DatabaseName屬性] 對話方塊的 [摘要] 索引標籤，方法是選取 [檔案] 功能表上的 [資料庫屬性]。) |
| TableDef | DatasheetBackColor、DatasheetCellsEffect、DatasheetFontHeight、DatasheetFontItalic、DatasheetFontName、DatasheetFontUnderline、DatasheetFontWeight、DatasheetForeColor、DatasheetGridlinesBehavior、DatasheetGridlinesColor、Description、FrozenColumns、RowHeight、ShowGrid |
| QueryDef | DatasheetBackColor、DatasheetCellsEffect、DatasheetFontHeight、DatasheetFontItalic、DatasheetFontName、DatasheetFontUnderline、DatasheetFontWeight、DatasheetForeColor、DatasheetGridlinesBehavior、DatasheetGridlinesColor、Description、FailOnError、FrozenColumns、LogMessages、MaxRecords、RecordLocks、RowHeight、ShowGrid、UseTransaction |
| Field | Caption、ColumnHidden、ColumnOrder、ColumnWidth、DecimalPlaces、Description、Format、InputMask |
另請參閱
- 存取開發人員論壇
- 在 support.office.com 上存取說明
- 存取 UtterAccess 上的論壇
- 存取開發人員和 VBA 程式設計說明中心 (FMS)
- 存取 StackOverflow 上的文章
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。