Re: [VB6 ] 請問關於判斷ComboBox的選取...

[fumizuki (矇面加菲獅)]

Private Sub Form_Load()
    Combo2.Clear
    Combo2.AddItem "通訊地址"
    Combo2.AddItem "電子信箱"
    Combo3.Clear
End Sub

Private Sub Combo2_Click()
    Call Combo2_Change()
End Sub

Private Sub Combo2_Change()
    Select Case Combo2.Text
        Case "通訊地址"
             Combo3.Clear
             Combo3.AddItem "台北"
             Combo3.AddItem "台中"
             Combo3.AddItem "台南"
        Case "電子信箱"
             Combo3.Clear
             Combo3.AddItem "Yahoo"
             Combo3.AddItem "Hotmail"
    End Select
End Sub

--
                                ▃▅▇▆▄                         ▆▂▃  `  
逝去感情如何能留住，半點癡情遺留殊不易，██▅▇▄▃                ▇▃▂"  .
                                    █████████▃i              ▁▄▇ 
              更多悽悽慘慘的遭遇…………██▆▃                █▅▆▃ˍ▄* 
                                                 ◢           ▂█▄▇▅▂▌. 
我不知道，王～八～蛋～～！           ▂▆███    █▄▃  。fumizuki。Check。

--
※ 發信站: 批踢踢實業坊(ptt.cc) 
◆ From: 210.58.156.43