1,216
社区成员
发帖
与我相关
我的任务
分享选中combox中选项后让其它控件相应，用哪个事件？是click,dragover,dragdown...?
我想让选择combox选项后，其它的控件进行相应，不知道用它哪个事件？click,dragover,dragdown，change,我都用了可是不行。
哪位高手帮帮我。
哪位高手帮帮我。
...全文
请发表友善的回复…
发表回复
RUKYO 2004-09-22
- 打赏
- 举报
用Click事件结合Combo的 List 和 ListIndex 属性就可以了
RUKYO 2004-09-22
- 打赏
- 举报
Private Sub Combo1_Click()
If Combo1.ListIndex Mod 2 = 0 Then
Text1.Text = Combo1.List(Combo1.ListIndex)
Else
Text2.Text = Combo1.List(Combo1.ListIndex)
End If
End Sub
Private Sub Form_Load()
Dim Entry, I
For I = 1 To 20
Entry = "Entry" & I
Combo1.AddItem Entry
Next I
End Sub
If Combo1.ListIndex Mod 2 = 0 Then
Text1.Text = Combo1.List(Combo1.ListIndex)
Else
Text2.Text = Combo1.List(Combo1.ListIndex)
End If
End Sub
Private Sub Form_Load()
Dim Entry, I
For I = 1 To 20
Entry = "Entry" & I
Combo1.AddItem Entry
Next I
End Sub
yijiansong 2004-09-22
- 打赏
- 举报
click事件！
starsrainmzl 2004-09-22
- 打赏
- 举报
click事件！
littlefishli 2004-09-22
- 打赏
- 举报
click事件就可以处理。当然也有点击之后没有选择的情况，这个时候selectedindex（好像是这个属性）＝－1
zichen66 2004-09-22
- 打赏
- 举报
如果你選擇了一個Combo控件中的項目﹐則會產生一個Combo_Click事件
lovebeethoven 2004-09-22
- 打赏
- 举报
你要在CLICK中写代码阿
lovebeethoven 2004-09-22
- 打赏
- 举报
应该用CLICK
