Свойство ToggleButton.OptionValue (Access)

Каждый элемент управления в группе параметров имеет числовое значение, которое можно задать с помощью свойства OptionValue . Для чтения и записи, Long.

Синтаксис

expression. OptionValue

Выражение Переменная, представляющая объект ToggleButton .

Замечания

При выборе элемента управления номер назначается группе параметров. Если группа параметров привязана к полю, значение свойства OptionValue выбранного элемента управления сохраняется в поле .

Например, эта группа параметров Регион привязана к полю Регион в таблице. Кнопка Европа имеет параметр свойства OptionValue 1, кнопка Азия имеет значение 2, а кнопка "Африка " имеет значение 3. Если выбрана одна из этих кнопок, значение группы параметров Регион будет совпадать с параметром свойства OptionValue для выбранного элемента управления. В этом случае, так как группа параметров Регион привязана к полю Регион , значение этого поля в таблице также равно 2.

Свойство OptionValue применяется только к элементам управления флажок, кнопка параметров и переключатель в группе параметров.

Если вы не измените свойство OptionValue самостоятельно, первый элемент управления, который вы размещаете в группе параметров, имеет значение 1, второй элемент управления имеет значение 2 и т. д.

Свойство OptionValue доступно только в том случае, если элемент управления помещается в элемент управления группы параметров. Если флажок, кнопка параметра или переключатель отсутствуют в группе параметров, элемент управления не имеет свойства OptionValue . Вместо этого каждый такой элемент управления имеет свойство ControlSource , и значение каждого элемента управления будет равно True , если выбрано значение, или False , если он не выбран.

Пример

В следующем примере задается свойство OptionValue для трех кнопок параметров в группе параметров Ship Method Group при открытии формы. При выборе кнопки параметра в группе параметров отображается сообщение с указанием назначенного грузоотправителям идентификатора.

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

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.