宿州二手房信息网:VB中combox问题!

来源:百度文库 编辑:查人人中国名人网 时间:2024/05/08 14:11:45
这样,有两个combox下拉框,第二个根据第一个下拉框而动态显示内容,要怎么做?我在load_form中用if语句判断,但是不知道为什么不行。好像在load_load中初始combox的值为空,判断不成,请把代码附上吧,3Q。

Private Sub Combo1_Click()
Combo2.Clear
For j = 0 To 3
Combo2.AddItem CStr(Combo1.ListIndex) & CStr(j), j
Next j
End Sub

Private Sub Form_Load()
For i = 0 To 3
Combo1.AddItem CStr(i), i
Next i
End Sub

是ComboBox吧。
用ComboBox的Click事件,当ComboBox值改变时,触发这个事件,然后再修改第二个ComboBox的值
Private Sub ComboBoxName_click()
对于第二个ComboBox的操作代码。
end sub
ComboBoxName是第一个ComboBox的名称

Private Sub Combo1_Click()
Combo2.Clear
For i = Combo1.ListIndex + 1 To 20 Step Combo1.ListIndex + 1
Combo2.AddItem i
Next
End Sub

Private Sub Form_Load()
For i = 1 To 10
Combo1.AddItem i & "的倍数"
Next
End Sub