Uygulandığı öğe
|
OnayKutusu Nesnesi |
|
SeçenekDüğmesi Nesnesi |
|
İkiDurumluDüğme Nesnesi |
seçenek grubu içindeki her denetim, OptionValue özelliğiyle ayarlayabileceğiniz sayısal bir değere sahiptir. Okuma/yazma Uzun.
ifade.OptionValue
ifade Gerekli. Uygulandığı Öğe listesindeki nesnelerden birini döndüren ifade.
Notlar
Denetim seçildiğinde, sayı seçenek grubuna atanır. Seçenek grubu bir alanla ilişkilendirildiyse, seçili denetimin OptionValue özelliğinin değeri alanda depolanır.
Örneğin, bu Bölge seçenek grubu tablo içindeki Bölge alanıyla ilişkilidir. Avrupa düğmesinin OptionValue özellik ayarı 1, Asya düğmesinin özellik ayarı 2 ve Afrika düğmesinin ayarı da 3'tür. Bu düğmelerden biri seçildiğinde, Bölge seçenek grubunun değeri seçili denetimin OptionValue özelliği ayarıyla aynı olur. Bu durumda, Bölge seçenek grubu Bölge alanıyla ilişkili olduğundan, tabloda bu alanın değeri de 2'ye eşittir.
Not: OptionValue özelliği yalnızca seçenek grubundaki onay kutusu, seçenek düğmesi ve geçiş düğmesi denetimleri için geçerlidir.
Denetimin özellik sayfasını, makro veya Visual Basic for Applications (VBA) kodunu kullanarak OptionValue özelliğini ayarlayabilirsiniz.
OptionValue özelliğini siz değiştirmediğiniz sürece, seçenek grubuna yerleştirdiğiniz ilk denetimin değeri 1, ikinci denetimin değeri 2, vb. olur.
OptionValue özelliği, yalnızca denetim bir seçenek grubu denetimi içinde yerleştirildiğinde kullanılabilir. Bir seçenek grubu içinde yer almayan denetim kutusu, iki durumlu düğme veya seçenek düğmesi denetimlerinin OptionValue özelliği yoktur. Bunun yerine, bu tür denetimlerden her birinin ControlSource özelliği vardır ve her denetimin değeri, seçildiyse Doğru veya seçilmediyse Yanlış olur.
Örnek
Aşağıdaki örnekte, form açıldığında "Sevk Yöntemi Grubu" seçenek grubundaki üç seçenek düğmesinin OptionValue özelliği ayarlanır. Seçenek grubunda bir seçenek düğmesi seçildiğinde, sevk eden kişinin atadığı kimlik numarasını gösteren bir ileti görüntülenir.
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
