共用方式為

ListWidth 屬性範例

  • 發行項

下列範例會使用 SpinButton 來控制 ComboBox下拉式清單的寬度。 使用者變更 SpinButton的值，然後按一下 ComboBox 的下拉式箭號以顯示清單。

若要使用本範例，請將此範例程式碼複製到表單的宣告部分中。 請確定該表單包含：

  • 一個名為 ComboBox1 的 ComboBox 。
  • 一個名為 SpinButton1 的 SpinButton 。
  • 一個名為 Label1 的 Label 。
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

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。