ListWidth-Eigenschaft (Beispiel)

The following example uses a SpinButton to control the width of the drop-down list of a ComboBox. Der Benutzer ändert den Wert von SpinButton und klickt dann auf den Dropdownpfeil des ComboBox-Steuerelements , um die Liste anzuzeigen.

Kopieren Sie diesen Beispielcode in den Deklarationsbereich eines Formulars. Stellen Sie sicher, dass das Formular folgende Komponenten enthält:

• Ein Kombinationsfeld-Steuerelement ( ComboBox ) mit der Bezeichnung "ComboBox1".
• Ein Drehfeld-Steuerelement ( SpinButton ) mit der Bezeichnung "SpinButton1".
• Ein Bezeichnungsfeld-Steuerelement ( Label ) mit der Bezeichnung "Label1".

Private Sub SpinButton1_Change() 
 ComboBox1.ListWidth = SpinButton1.Value 
 Label1.Caption = "ListWidth = " _ 
 & SpinButton1.Value 
End Sub 
 
Private Sub UserForm_Initialize() 
 Dim i As Integer 
 
 For i = 1 To 20 
 ComboBox1.AddItem "Choice " _ 
 & (ComboBox1.ListCount + 1) 
 Next i 
 
 SpinButton1.Min = 0 
 SpinButton1.Max = 130 
 SpinButton1.Value = Val(ComboBox1.ListWidth) 
 SpinButton1.SmallChange = 5 
 Label1.Caption = "ListWidth = " _ 
 & SpinButton1.Value 
End Sub

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.