Propriedade ToggleButton.OptionValue (Access)

Cada controle em um grupo de opção tem um valor numérico que você pode definir com a propriedade OptionValue. Long de leitura/gravação.

Sintaxe

expressão. Optionvalue

Expressão Uma variável que representa um objeto ToggleButton .

Comentários

Quando o controle é selecionado, o número é atribuído ao grupo de opção. Se o grupo de opção é acoplado a um campo, o valor da propriedade OptionValue do controle selecionado é armazenado no campo.

Por exemplo, esse grupo de opções Region está vinculado ao campo Região em uma tabela. O botão Europa tem uma configuração de propriedade OptionValue de 1, o botão Ásia possui uma configuração de 2 e o botão África possui uma configuração de 3. Quando um desses botões é selecionado, o valor do grupo de opção região será o mesmo que a configuração da propriedade OptionValue do controle selecionado. Nesse caso, como o grupo de opções Região está vinculado ao campo Região , o valor desse campo na tabela também é igual a 2.

A propriedade OptionValue só se aplica a caixa de seleção, botão de opção e controles de botão de alternância em um grupo de opção.

A menos que você altere a propriedade OptionValue por conta própria, o primeiro controle que você colocar em um grupo de opções tem um valor de 1, o segundo controle tem um valor de 2 e assim por diante.

A propriedade OptionValue só está disponível quando o controle é colocado dentro de um controle de grupo de opção. Quando uma caixa de seleção, um botão de opção ou um botão de alternância não estiver em um grupo de opções, o controle não tem nenhuma propriedade OptionValue . Em vez disso, cada controle tem uma propriedade ControlSource, e o valor de cada controle será True se selecionado ou False se não selecionado.

Exemplo

O exemplo a seguir define a propriedade OptionValue para três botões de opção no grupo de opções Grupo de Métodos de Envio quando um formulário é aberto. Quando um botão de opção é selecionado no grupo de opção, uma mensagem é exibida indicando o número de identificação do emissor.

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

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.