Access VBA教程:SetOption方法

SetOption方法设置“选项”对话框中选项的当前值。

expression.SetOption(OptionName, Setting)

expression   必需。返回“Applies To”列表中的一个对象的表达式。

OptionName  必需 String 型。选项的名称。有关 optionname参数字符串的列表,请参阅从 Visual Basic 中设置选项

Setting  必需 Variant 型。 与选项设置对应的Variant 值。setting参数的值取决于指定选项的可能设置。

说明

SetOption方法提供一种从Visual Basic 代码更改环境选项的途径。利用这种方法,可以设置或读取“选项”对话框中除“模块”选项卡上选项之外的任何可用的选项设置。

可用的选项设置取决于要设置的选项的类型。有三种常规类型的选项:

对于可通过选中或清除复选框、使用SetOption方法进行设置的选项,请按如下示例所示为 setting参数指定 True 或 False:


Application.SetOption "Show Status Bar", True

若要用 SetOption方法设置这种类型的选项,请指定将在对话框中键入的字符串或数值。下面的示例将默认的窗体模板设为“订单模板”:


Application.SetOption "Form Template", "OrderTemplate"

对于通过在列表框或组合框中进行选择的选项,与使用 SetOption方法的 setting参数一样,请在列表内指定选项的数字位置。下面的示例将“默认字段类型”选项设为“自动编号”:


Application.SetOption "Default Field Type", 5

如果要设置的选项是选项组中的成员,则只需指定该选项在组中的索引编号即可。下面的示例将 Selection Behavior 设为“全部包含”:


Application.SetOption "Selection Behavior", 1

注意

当退出 Microsoft Access 时,可以将所有选项重新设置为其初始值,方法是对所有更改了的选项使用 SetOption方法。首先创建公用变量来保存初始设置的值,然后在窗体的 Close事件过程或自定义退出过程(用户要退出应用程序必须运行的过程)中包括用于重新设置选项的代码。

上页:Access VBA教程:SetHiddenAttribute方法 下页:Access VBA教程:SizeToFit方法

Access VBA教程:SetOption方法

Access VBA教程:SizeToFit方法 Access VBA教程:StringFromGUID方法
Access VBA教程:SysCmd方法 Access VBA教程:TextHeight方法
Access VBA教程:TextWidth方法 Access VBA教程:TransferSQLDatabase方法
Access VBA教程:Undo方法 Access VBA教程:UseDefaultFolderSuffix方法
Access VBA教程:AccessObject对象 Access VBA教程:AccessObjectProperty对象
Access VBA教程:AllFunctions集合 Access VBA教程:Application对象
Access VBA教程:BoundObjectFrame对象 Access VBA教程:CheckBox对象
Access VBA教程:CodeData对象 Access VBA教程:CodeProject对象
Access VBA教程:ComboBox对象 Access VBA教程:CommandButton对象
Access VBA教程:Control对象 Access VBA教程:CurrentData对象
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号