SetOption 方法設(shè)置“選項(xiàng)”對(duì)話框中選項(xiàng)的當(dāng)前值。
expression.SetOption(OptionName, Setting)
expression 必需。返回“應(yīng)用于”列表中的一個(gè)對(duì)象的表達(dá)式。
OptionName 必需 String 型。選項(xiàng)的名稱。有關(guān) optionname 參數(shù)字符串的列表,請(qǐng)參閱從 Visual Basic 中設(shè)置選項(xiàng)。
Setting 必需 Variant 型。 與選項(xiàng)設(shè)置對(duì)應(yīng)的 Variant 值。setting 參數(shù)的值取決于指定選項(xiàng)的可能設(shè)置。
SetOption 方法提供一種從 Visual Basic 代碼更改環(huán)境選項(xiàng)的途徑。利用這種方法,可以設(shè)置或讀取“選項(xiàng)”對(duì)話框中除“模塊”選項(xiàng)卡上選項(xiàng)之外的任何可用的選項(xiàng)設(shè)置。
可用的選項(xiàng)設(shè)置取決于要設(shè)置的選項(xiàng)的類型。有三種常規(guī)類型的選項(xiàng):
? | 能通過選中或清除復(fù)選框來進(jìn)行設(shè)置的 Yes/No 選項(xiàng)。 |
? | 能通過輸入一個(gè)字符串或數(shù)值來進(jìn)行設(shè)置的選項(xiàng)。 |
? | 能從列表框、組合框或選項(xiàng)組來進(jìn)行選擇的預(yù)定義選項(xiàng)。 |
對(duì)于可通過選中或清除復(fù)選框、使用SetOption 方法進(jìn)行設(shè)置的選項(xiàng),請(qǐng)按如下示例所示為 setting 參數(shù)指定 True 或 False:
Application.SetOption "Show Status Bar", True
若要用 SetOption 方法設(shè)置這種類型的選項(xiàng),請(qǐng)指定將在對(duì)話框中鍵入的字符串或數(shù)值。下面的示例將默認(rèn)的窗體模板設(shè)為“訂單模板”:
Application.SetOption "Form Template", "OrderTemplate"
對(duì)于通過在列表框或組合框中進(jìn)行選擇的選項(xiàng),與使用 SetOption 方法的 setting 參數(shù)一樣,請(qǐng)?jiān)诹斜韮?nèi)指定選項(xiàng)的數(shù)字位置。下面的示例將“默認(rèn)字段類型”選項(xiàng)設(shè)為“自動(dòng)編號(hào)”:
Application.SetOption "Default Field Type", 5
如果要設(shè)置的選項(xiàng)是選項(xiàng)組中的成員,則只需指定該選項(xiàng)在組中的索引編號(hào)即可。下面的示例將 Selection Behavior 設(shè)為“全部包含”:
Application.SetOption "Selection Behavior", 1
注釋
? | 使用 SetOption 方法設(shè)置“選項(xiàng)”對(duì)話框中的選項(xiàng)時(shí),不必指定選項(xiàng)所在的選項(xiàng)卡。 |
? | 不能使用 SetOption 方法來讀取或設(shè)置“選項(xiàng)”對(duì)話框中“模塊”選項(xiàng)卡上的任何選項(xiàng)。 |
? | 如果數(shù)據(jù)庫(kù)可以運(yùn)行在另一種語言(非創(chuàng)建時(shí)使用的語言)的 Microsoft Access 版本中,那么,必須使用英語為 SetOption 方法提供參數(shù)。 |
當(dāng)退出 Microsoft Access 時(shí),可以將所有選項(xiàng)重新設(shè)置為其初始值,方法是對(duì)所有更改了的選項(xiàng)使用 SetOption 方法。首先創(chuàng)建公用變量來保存初始設(shè)置的值,然后在窗體的 Close 事件過程或自定義退出過程(用戶要退出應(yīng)用程序必須運(yùn)行的過程)中包括用于重新設(shè)置選項(xiàng)的代碼。