共用方式為

Application.GetOption 方法 (Access)

  • 發行項

GetOption方法會傳回 [存取選項] 對話方塊中選項的目前值，您可以選擇 [Microsoft Office] 按鈕，然後選擇 [存取選項]。 Variant.

語法

運算式。GetOption (OptionName)

expression 代表 Application 物件的變數。

參數

名稱 必要/選用 資料類型 描述
OptionName 必要 String 選項的名稱。 如需選項名稱引數字串的清單，請參閱 從 Visual Basic 設定選項。

傳回值

Variant

註解

GetOption和SetOption方法提供從 Visual Basic 程式碼變更環境選項的方法。 使用這些方法，可以設定或讀取 [Access 選項] 對話方塊中提供的所有選項。

可用的選項設定值取決於設定的選項類型。 共有三種常見的選項類型：

  • 可藉由選取或清除核取方塊來設定的是/否選項。

  • 可藉由輸入字串或數值來設定的選項。

  • 可在清單方塊、下拉式方塊或選項群組中選擇的預先定義選項。

對於使用者選取或清除核取方塊所設定的選項，如果選取核取方塊) 選取選項設定為 [是 (]，則GetOption方法會傳回True ( (1) 如果選項設定為 [否) 則為False () 0) 。 若要使用 SetOption 方法來設定此類別的選項，請針對 setting 引數指定 True 或 False ，如下列範例所示。

Application.SetOption "Show Status Bar", True

對於使用者輸入字串或數值所設定的選項， GetOption 方法會傳回設定，如同其顯示在對話方塊中一樣。 下列範例會傳回包含左邊界設定的字串。

Dim varSetting As Variant 
varSetting = Application.GetOption("Left Margin")

若要使用 SetOption 方法來設定這種類型的選項，請指定對話方塊中所輸入的字串或數值。 下列範例會將預設表單範本設定為 OrderTemplate。

Application.SetOption "Form Template", "OrderTemplate"

對於在清單方塊或下拉式方塊中選擇設定的選項而言，GetOption 方法會傳回該設定值在清單中位置的對應數字。 其索引編號從 0 開始，因此若為第一個項目，GetOption 方法便會傳回 0，第二個項目則傳回 1，依此類推。 例如，當 [物件設計師] 索引標籤上的 [預設欄位類型] 選項設為 [自動編號] 時，對於清單中的第六個項目，GetOption 方法便會傳回 5。

若要設定這種類型的選項，請將該選項在清單中的數值位置指定為 SetOption 方法的 setting 引數。 下列範例會將 [預設欄位類型] 選項設定為 [自動編號]。

Application.SetOption "Default Field Type", 5

其他選項是透過在 [存 取 選項] 對話方塊的選項群組中選擇選項按鈕來設定。 在 Visual Basic 中，也可以藉由指定特定選項在群組中的位置來設定這些選項。 群組中第一個選項的編號為 0，第二個選項的編號為 1，依此類推。 例如，如果 [物件設計工具] 索引標籤上的 [選取行為] 選項設定為 [部分封閉]，則 GetOption方法會傳回零，如下列範例所示。

Debug.Print Application.GetOption("Selection Behavior")

如果要設定的選項是選項群組的成員，請指定該選項在群組中的索引編號。 下列範例會將 [選取行為 ] 設定為 [完全封閉]。

Application.SetOption "Selection Behavior", 1

注意事項

當您結束 Microsoft Access 時，您可以使用重設所有選項其原始設定 SetOption 方法上所有已變更的選項。 若要建立公用變數來儲存原始設定的值。 您可以在表單的 Close 事件程序中，或在使用者必須執行才能結束應用程式的自訂結束程式中，包含重設選項的程式碼。

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。