OptionValue 属性

expandtri全部显示

选项组中的每个控件都有一个可以用 OptionValue 属性设置的数字值。Long 型,可读写。

expression.OptionValue

expression     必需。返回“应用于”列表中的一个对象的表达式。

说明

选择控件时,会将相应的数字赋给选项组。如果选项组是绑定到某字段的,所选控件的 OptionValue 属性值就存储在该字段中。

例如,“地区”选项组是绑定到中的“地区”字段的,“欧洲”按钮的 OptionValue 属性设为 1,“亚洲”按钮的 OptionValue 属性设为 2,“非洲”按钮的 OptionValue 属性设为 3。选定其中某个按钮时,“地区”选项组的值将和选定控件的 OptionValue 属性设置相同。在这种情况下,由于“地区”选项组是绑定到“地区”字段的,所以表中该字段的值也等于 2。

注释 OptionValue 属性仅应用于选项组中的复选框选项按钮切换按钮控件。

通过使用控件的属性表或者 Visual Basic 可以对控件的 OptionValue 属性进行设置。

除非对 OptionValue 属性进行修改,否则添加到选项组中的第一个控件的 OptionValue 属性值为 1,第二个控件的 OptionValue 属性值为 2,依此类推。

OptionValue 属性仅在控件放入选项组控件时才可用。如果某个复选框、切换按钮或选项按钮未放在选项组中,该控件就没有 OptionValue 属性。而每个这种控件都有 ControlSource 属性,当控件被选定时,该属性值为 True,如果未选定控件,则该属性值为 False

示例

下面的示例在窗体打开时对“运货方法组”选项组中三个选项按钮的 OptionValue 属性进行设置。当选中选项组中的某个选项按钮时,就会显示一条消息,表明运货商的指定 ID 号。

Private Sub Form_Open(Cancel As Integer)

    Me.Controls("ABC Couriers").OptionValue = 15876

    Me.Controls("Speedy Delivery").OptionValue = 742

    Me.Controls("Lightning Express").OptionValue = 1256

End Sub

Private Sub Ship_Method_Group_Click()

    MsgBox "The ID for the selected shipper is " &

Me.Controls("Ship Method Group").Value

End Sub