- 帖子
- 128
- 主題
- 62
- 精華
- 0
- 積分
- 176
- 點名
- 0
- 作業系統
- win8
- 軟體版本
- office2003
- 閱讀權限
- 20
- 註冊時間
- 2013-1-24
- 最後登錄
- 2026-9-14
|
大家好
小弟最近想使用VBA建立自己畫面的下拉式表單功能,但因為相關選單實在太多,有什麼比較快的方式作宣告嗎??
例如以下:光一個COMBOBOX1就有32個需要宣告
而COMBOBOX又有20個需要做一樣的宣告
這樣我就必須寫32*20=640個
雖然可以做,但實在是太佔版面,所以有什麼好建議嗎??
ComboBox1.AddItem "aiSV4" '----------------1
ComboBox1.AddItem "aiSV20" '----------------2
ComboBox1.AddItem "aiSV40" '----------------3
ComboBox1.AddItem "aiSV80" '----------------4
ComboBox1.AddItem "aiSV160" '----------------5
ComboBox1.AddItem "aiSV360" '----------------6
ComboBox1.AddItem "aiSV4/4" '----------------7
ComboBox1.AddItem "aiSV4/20" '----------------8
ComboBox1.AddItem "aiSV20/20" '----------------9
ComboBox1.AddItem "aiSV20/40" '----------------10
ComboBox1.AddItem "aiSV40/40" '----------------11
ComboBox1.AddItem "aiSV40/80" '----------------12
ComboBox1.AddItem "aiSV80/80" '----------------13
ComboBox1.AddItem "aiSV80/160" '----------------14
ComboBox1.AddItem "aiSV160/160" '----------------15
ComboBox1.AddItem "aiSV4/4/4" '----------------16
ComboBox1.AddItem "aiSV20/20/20" '----------------17
ComboBox1.AddItem "aiSV20/20/40" '----------------18
ComboBox1.AddItem "aiSV40/40/40" '----------------19
ComboBox1.AddItem " " '----------------20
ComboBox1.AddItem "aiSV10 HV" '----------------21
ComboBox1.AddItem "aiSV20 HV" '----------------22
ComboBox1.AddItem "aiSV40 HV" '----------------23
ComboBox1.AddItem "aiSV80 HV" '----------------24
ComboBox1.AddItem "aiSV180 HV" '----------------25
ComboBox1.AddItem "aiSV360 HV" '----------------26
ComboBox1.AddItem "aiSV10/10 HV" '----------------27
ComboBox1.AddItem "aiSV20/20 HV" '----------------28
ComboBox1.AddItem "aiSV20/40 HV" '----------------29
ComboBox1.AddItem "aiSV40/40 HV" '----------------30
ComboBox1.AddItem "aiSV40/80 HV" '----------------31
ComboBox1.AddItem "aiSV80/80 HV" '----------------32 |
|