Propriedade ValorDaOpção

Aplica-se a

Cada controlo num grupo de opções tem um valor numérico que pode definir com a propriedade ValorDaOpção. Número Inteiro Longo de leitura/escrita.

expressão.ValorDaOpção

expressão Obrigatório. Uma expressão que devolve um dos objetos na lista Aplica-se A.

Observações

Quando o controlo estiver selecionado, o número é atribuído ao grupo de opções. Se o grupo de opções estiver vinculado a um campo, o valor da propriedade ValorDaOpção do controlo selecionado é armazenado no campo.

Por exemplo, este grupo de opções Região está vinculado ao campo Região numa tabela. O botão Europa tem uma definição de propriedade ValorDaOpção de 1, o botão Ásia tem uma definição de 2 e o botão África tem uma definição de 3. Quando um destes botões estiver selecionado, o valor do grupo de opções Região será igual à definição da propriedade ValorDaOpção do controlo selecionado. Neste caso, uma vez que o grupo de opções Região está vinculado ao campo Região, o valor deste campo na tabela também é igual a 2.

Pode definir a propriedade ValorDaOpção com a folha de propriedades, uma macro ou o código VBA (Visual Basic for Applications) do controlo.

A menos que altere a propriedade ValorDaOpção por si próprio, o primeiro controlo que colocar num grupo de opções tem um valor de 1, o segundo controlo tem o valor de 2 e assim sucessivamente.

A propriedade ValorDaOpção só está disponível quando o controlo é colocado dentro de um controlo de grupo de opções. Quando uma caixa de verificação, um botão de alternar ou um botão de opção não estiver num grupo de opções, o controlo não tem a propriedade ValorDaOpção. Em vez disso, cada um desses controlos tem uma propriedade OrigemDoControlo e o valor de cada controlo irá ser Verdadeiro se selecionado ou Falso se não selecionado.

Exemplo

O exemplo seguinte define a propriedade ValorDaOpção (OptionValue) de três botões de opções no grupo de opções "Ship Method Group" quando um formulário é aberto. Quando um botão de opção estiver selecionado no grupo de opções, é apresentada uma mensagem a indicar o número de ID atribuído à 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