Propriedade OptionValue

Aplicável a

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

expressão.OptionValue

expressão Obrigatória. Uma expressão que retorna um dos objetos na lista Aplica-se a.

Comentários

Quando o controle é selecionado, o número é atribuído ao grupo de opções. Se o grupo de opções estiver associado a um campo, o valor da propriedade OptionValue do controle selecionado será armazenado no campo.

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

Você pode definir a propriedade OptionValue usando a folha de propriedades do controle, uma macro ou o código do Visual Basic for Applications (VBA).

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

A propriedade OptionValue só está disponível quando o controle é colocado em um controle de grupo de opções. Quando uma caixa de seleção, um botão de alternância ou um botão de opção não está em um grupo de opções, o controle não tem uma propriedade OptionValue. Em vez disso, cada controle tem uma propriedade ControlSource, e o valor de cada controle será Verdadeiro se estiver selecionado ou Falso se não estiver 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 entrega" quando um formulário é aberto. Quando um botão de opção for selecionado no grupo de opções, uma mensagem será exibida, indicando o número de ID designado da transportadora.

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