Koskee seuraavia
|
Valintaruutuobjekti |
|
Valintapainikeobjekti |
|
Vaihtopainikeobjekti |
Jokaisella ohjainn vaihtoehtoryhmälla on numeerinen arvo, joka voidaan asettaa VaihtoehdonArvo-ominaisuuden avulla. Pitkä, jolla on luku-/kirjoitusoikeudet.
lauseke.VaihtoehdonArvo
lauseke Pakollinen. Lauseke, joka palauttaa jonkin Koskee seuraavia -luettelon objekteista.
Huomautuksia
Kun ohjausobjekti valitaan, numero määritetään vaihtoehtoryhmään. Jos vaihtoehtoryhmä on sidottu kenttään, valitun ohjausobjektin VaihtoehdonArvo -ominaisuuden arvo tallennetaan kenttään.
Esimerkiksi tämä Alue-vaihtoehtoryhmä on sidottu taulukkokohteen Alue-kenttään. Eurooppa-painikkeen VaihtoehdonArvo-ominaisuuden arvo on 1, Aasia-painikkeen ominaisuuden arvo on 2 ja Afrikka-painikkeen 3. Kun jokin näistä painikkeista valitaan, Alue-vaihtoehtoryhmän arvo on sama kuin valitun ohjausobjektin VaihtoehdonArvo-ominaisuuden arvo. Koska tässä tapauksessa Alue-vaihtoehtoryhmä on sidottu Alue-kenttään, taulukon Alue-kentän arvo on 2.
Huomautus: VaihtoehdonArvo-ominaisuus koskee vaihtoehtoryhmässä vain valintaruutu-, valintapainike- ja vaihtopainike-ohjausobjekteja.
Voit määrittää VaihtoehdonArvo-ominaisuuden ohjausobjektin ominaisuusikkunan, makron tai Visual Basic for Applications (VBA) -koodin avulla.
Jos et muuta VaihtoehdonArvo-ominaisuuden arvoa, ensimmäisen vaihtoehtoryhmään lisättävän ohjausobjektin arvo on 1, toisen ohjausobjektin arvo on 2 ja niin edelleen.
VaihtoehdonArvo-ominaisuus on käytettävissä vain, kun ohjausobjekti on sijoitettu vaihtoehtoryhmän ohjausobjektiin. Jos valintaruutu, vaihtopainike tai valintapainike ei kuulu vaihtoehtoryhmään, ohjausobjektilla ei ole VaihtoehdonArvo-ominaisuutta. Tällöin ohjausobjektilla on sen sijaan OhjausobjektinLähde-ominaisuus ja kunkin ohjausobjektin arvo on joko Tosi, jos ohjausobjekti on valittuna, tai Epätosi, jos ohjausobjekti ei ole valittuna.
Esimerkki
Seuraavassa esimerkissä asetetaan VaihtoehdonArvo-ominaisuus kolmelle valintapainikkeelle Ship Method Group -vaihtoehtoryhmässä, kun lomake avataan. Kun vaihtoehtoryhmästä valitaan valintapainike, näyttöön tulee toimittajalle määritetty tunnus.
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
