Lastnost OptionValue

Velja za

Vsak kontrolnik v skupina možnosti ima številsko vrednost, ki jo lahko nastavite z lastnostjo OptionValue . Dolgo za branje/pisanje.

expression.OptionValue

izraz Obvezen. Izraz, ki vrne enega od predmetov s seznama »Velja za«.

Pripombe

Ko je izbran kontrolnik, je številka dodeljena skupini možnosti. Če je skupina možnosti vezana na polje, je vrednost lastnosti OptionValue izbranega kontrolnika shranjena v polju.

Ta skupina možnosti Območje je na primer vezana na polje Območje v Tabela. Gumb »Evropa« ima nastavitev lastnosti OptionValue 1, gumb »Azija« ima nastavitev 2, gumb »Afrika« pa ima nastavitev 3. Ko izberete enega od teh gumbov, bo vrednost skupine možnosti Območje enaka kot nastavitev lastnosti OptionValue za izbrani kontrolnik. Ker je skupina možnosti Območje vezana na polje Območje, je vrednost tega polja v tabeli prav tako enaka 2.

Lastnost OptionValue lahko nastavite tako, da uporabite list z lastnostmi kontrolnika, makro ali kodo Visual Basic for Applications (VBA).

Razen če sami spremenite lastnost OptionValue, ima prvi kontrolnik, ki ga postavite v skupino možnosti, vrednost 1, drugi kontrolnik vrednost 2 itd.

Lastnost OptionValue je na voljo le, ko kontrolnik postavite v kontrolnik skupine možnosti. Če potrditveno polje, preklopni gumb ali izbirni gumb ni v skupini možnosti, kontrolnik nima lastnosti OptionValue. Namesto tega ima vsak takšen kontrolnik lastnost ControlSource, vrednost vsakega kontrolnika pa je True, če je izbran, ali False, če ni izbran.

Primer

V tem primeru je lastnost OptionValue nastavljena za tri izbirne gumbe v skupini možnosti »Skupina za pošiljanje«, ko je odprt obrazec. Če je v skupini možnosti izbran izbirni gumb, je prikazano sporočilo, ki označuje številko dodeljenega ID-ja pošiljatelja.

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