Re: [VB6 ] ComboBox的用法..

看板Visual_Basic作者MAGICXX (逢甲阿法)時間14年前 (2011/04/19 15:45)推噓2(2推 0噓 5→)

留言7則, 4人參與討論串4/4 (看更多)

※ 引述《ClubT (勇氣是實現夢想的魔法)》之銘言： : ※ 引述《foliyo (生命的過客)》之銘言： : : 我拉兩個combobox來選擇 : : 首先combo1的內容我已經直接打在form裡面 : : 所以一開始就會有東西 : : 但是我的combo2想要依照combo1下去判斷而出現我的結果 : : 例如: combo1現在有 a b c d e 五個選項 : : 我選擇 a : : combo2 會馬上出現 11 22 33 三個選項給我選擇 : : 選擇 b : : 會出現 44 55 66 給我選擇 : : 我有爬文找到相關的 : : 但是好像怎麼打 combo2 就都是空白的.... : : 還是要再拉其他物件? : 如果你會出現的東西是固定的 : : Select Case Combo1.ListIndex : Case 0 : Combo2.Clear : Combo2.AddItem "aa" : Combo2.AddItem "bb" : Combo2.AddItem "cc" : Case 1 : Combo2.Clear : Combo2.AddItem "dd" : Combo2.AddItem "ee" : Combo2.AddItem "ff" : End Select : : 大概就這樣囉 : 簡單說就是先清掉 Combo2 再新增你要的資料 Private Sub Form_Load() Combo1.AddItem "0公分" Combo1.ItemData(Combo1.NewIndex) = 99 Combo1.AddItem "10公分" Combo1.ItemData(Combo1.NewIndex) = 71 Combo1.AddItem "20公分" Combo1.ItemData(Combo1.NewIndex) = 65 Select Case Combo1.ListIndex Case 0 Combo2.Clear Combo2.AddItem "aa" Combo2.AddItem "bb" Combo2.AddItem "cc" Case 1 Combo2.Clear Combo2.AddItem "dd" Combo2.AddItem "ee" Combo2.AddItem "ff" Case 2 Combo2.Clear Combo2.AddItem "GG" Combo2.AddItem "HH" Combo2.AddItem "ii" End Select End Sub 抱歉拉這麼久的文章出來問不過我剛好有這方面的問題@@ 因為我把這整段放在Private Sub Form_Load()下面是沒有效果的... 我的COMBOBOX2裡面還是白白的...什麼也沒有我曾經有試過是不是上面的CASE選錯了....(我以為要放值) 結果也是沒有反應我放在Private Sub Combo2_Click()底下更沒有反應... 請問是哪邊錯了勒...? 我該放在哪邊? CASE 0 1 2這些要怎麼定義!? -- #1CYsr0re (Keelung)

→

todo70192

09/11 20:11,

09/11 20:11

→

todo70192

09/11 20:12,

09/11 20:12

→

sinyuan99

09/11 20:24,

09/11 20:24