Vorgehensweise: Gruppieren von OptionsfeldernHow to: Group Option Buttons

Im folgenden Beispiel wird die GroupName -Eigenschaft verwendet, um zwei Gruppen von Optionsfeld -Steuerelemente in demselben Formular zu erstellen.The following example uses the GroupName property to create two groups of OptionButton controls on the same form.

Kopieren Sie diesen Beispielcode in den Skript-Editor eines Formulars.To use this example, copy this sample code to the Script Editor of a form. Zum Ausführen des Codes müssen Sie das Formular zu öffnen, damit das Open -Ereignis aktiviert wird.To run the code you need to open the form so the Open event will activate. Stellen Sie sicher, dass das Formular fünf OptionButton -Steuerelemente enthält, die mit "OptionButton1" bis "OptionButton5" benannt sind.Make sure that the form contains five OptionButton controls named OptionButton1 through OptionButton5.

Sub Item_Open() 
 set OptionButton1 = Item.GetInspector.ModifiedFormPages("P.2").Controls("OptionButton1") 
 set OptionButton2 = Item.GetInspector.ModifiedFormPages("P.2").Controls("OptionButton2") 
 set OptionButton3 = Item.GetInspector.ModifiedFormPages("P.2").Controls("OptionButton3") 
 set OptionButton4 = Item.GetInspector.ModifiedFormPages("P.2").Controls("OptionButton4") 
 set OptionButton5 = Item.GetInspector.ModifiedFormPages("P.2").Controls("OptionButton5") 
 
 OptionButton1.Caption = "Widgets" 
 OptionButton2.Caption = "Widgets" 
 OptionButton3.Caption = "Widgets" 
 OptionButton1.GroupName = "Widgets" 
 OptionButton2.GroupName = "Widgets" 
 OptionButton3.GroupName = "Widgets" 
 
 OptionButton4.Caption = "Gadgets-Group2" 
 OptionButton5.Caption = "Gadgets-Group2" 
 OptionButton4.GroupName = "Gadgets-Group2" 
 OptionButton5.GroupName = "Gadgets-Group2" 
End Sub