OptionValue tulajdonság

Érvényesség

A vezérlőelem-csoportok minden vezérlőjéhez tartozik egy numerikus érték, amely az OptionValue (Választási lehetőség) tulajdonsággal állítható be. Olvasható/írható, Long típusú.

kifejezés.OptionValue

Kifejezés Megadása kötelező. Egy kifejezés, amely a Hatókör listában szereplő objektumok egyikét adja vissza.

Megjegyzések

A vezérlő kiválasztásakor a számot a rendszer hozzárendeli a vezérlőelem-csoporthoz. Ha a vezérlőelem-csoport mezőhöz kötött, akkor a kiválasztott vezérlő OptionValue tulajdonságát a mező tárolja.

Tegyük fel például, hogy a Régió vezérlőelem-csoport egy tábla Régió mezőjéhez kötött. A Európa gomb OptionValue értéke 1, az Ázsia gombé 2, az Afrika gombé pedig 3. A gombok valamelyikének kiválasztásakor a Régió vezérlőelem-csoport értéke ugyanaz lesz, mint az adott vezérlőhöz beállított OptionValue érték. Ebben az esetben, mivel a Régió vezérlőelem-csoport a Régió mezőhöz kötött, ennek a mezőnek az értéke a táblában is 2 lesz.

Az OptionValue tulajdonság értéke a vezérlő tulajdonságlapján, egy makróval vagy Visual Basic for Applications (VBA) kóddal állítható be.

Ha a felhasználó nem módosítja az OptionValue tulajdonság beállítását, valamely vezérlő vezérlőelem-csoportba helyezésekor az első vezérlő értéke alapértelmezés szerint 1, a másodiké 2 lesz, és így tovább.

A OptionValue tulajdonság csak akkor érhető el, ha az adott vezérlő egy vezérlőelem-csoportba kerül. Ha egy jelölőnégyzet, váltógomb vagy választógomb nem tartozik vezérlőelem-csoportba, akkor nem adható meg hozzá az OptionValue tulajdonság. Az ilyen vezérlők ehelyett a ControlSource tulajdonsággal fognak rendelkezni, amelynek értéke True (Igaz) lesz, ha kijelölik, és False (Hamis) lesz, ha nem jelölik ki.

Példa

Az alábbi kódminta meghatározza, hogy egy űrlap megnyitásakor a „Szállítási módszer csoport" (Ship Method Group) három választógombja milyen OptionValue értékkel fog rendelkezni. Amikor a felhasználó kiválasztja a vezérlőelem-csoport egyik választógombját, meg fog jelenni egy üzenet a szállítóhoz rendelt azonosítószámmal.

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