close
VB combobox
我在UserForm1裡新增一個combobox內容：PrivateSubComboBox1_Change()ComboBox1_Change.AddItem"123"ComboBox1_Change.AddItem"456"EndSub但是執行後，下拉選單都還是空白的請問是哪裡出了問題嗎?如何讓下拉選單出現"123"跟"456"讓我選擇?請大大指教謝謝更新:TO:吼兒還是不行~"~更新2:TO:賢情逸致我試了你的語法也是一樣不行。另外我在參考書裡面看了一個範例：PrivateSubUserform_Activate()WithUserForm1.ComboBox1.AddItem"111".AddItem"222"EndWithEndSub這樣下拉選單就會出現了。1、請問一下userform_activate這個是固定的不能改變嗎?我改變了之後下拉選單又變空白。2、WithUserForm1.ComboBox1是什麼意思，可以幫我解釋一下嗎?
Private Sub Combo1_GotFocus() Combo1.Text = "" ''主要是這個 << 要先清除 Combo1.AddItem "111" Combo1.AddItem "222" End Sub Change 是發生在選單資料改變 所以建議寫在 form 的 load 或 Combo1 的 click 之類 可以自己試看看 2010-12-11 01:07:13 補充： Private Sub Userform_Activate() 'Userform 表單名稱 Activate 事件 就是表單第一件要做的是 With UserForm1.ComboBox1 '在with...end with 使用的屬性都是 ComboBox1 .AddItem "111" .AddItem "222" End With End Sub 意思就是說 表單一開始就先新增
ComboBox1_Change.AddItem改ComboBox1.AddItem2010-12-1023:45:59補充：Userform_Activate是一個事件如果更改會被判斷成自訂函式，沒呼叫就不會執行With用在設定同一控制項的多個屬性With控制項名稱.屬性1=數值1.屬性2=數值2.屬性3=數值3EndWith
以上文章來自奇摩知識家，如有侵犯請留言告知
https://tw.answers.yahoo.com/question/index?qid=20101209000010KK08169