| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 815 人关注过本帖
标题:还是Combo_Click()问题
只看楼主 加入收藏
yangqiu926
Rank: 1
等 级:新手上路
帖 子:11
专家分:0
注 册:2007-7-2
收藏
 问题点数:0 回复次数:7 
还是Combo_Click()问题
如果我的combo3_click()是一个下拉式菜单.发生click事件是,下拉菜单中每选一项其他选项就发生变化.可是为什么不能建立两个combo3_click()事件.那应该怎么办!
本人初学者还请大家多指教!!
搜索更多相关主题的帖子: Combo Click click 菜单 
2007-07-05 13:13
缘吇弹
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:地球
等 级:版主
威 望:43
帖 子:3038
专家分:27
注 册:2007-7-2
收藏
得分:0 

请说清楚一点,"发生click事件是,下拉菜单中每选一项其他选项就发生变化" 中的"其他选项"是指 combo3中的 还是 combo1 或 combo2 中的选项 ?


Repeat  Life=Study;Until (death);
2007-07-05 13:42
缘吇弹
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:地球
等 级:版主
威 望:43
帖 子:3038
专家分:27
注 册:2007-7-2
收藏
得分:0 
不说清楚人家怎么帮你
大家都有自己的事情,不可能替你什么情况都考虑!

Repeat  Life=Study;Until (death);
2007-07-05 13:44
yangqiu926
Rank: 1
等 级:新手上路
帖 子:11
专家分:0
注 册:2007-7-2
收藏
得分:0 
不好意思,真是麻烦了!
就是下拉菜单中有两个选项.选折其中一项,其他的 label.caption显示的内容就发生变化.但是不能建立两个combo3_click()事件,那要怎么办?
2007-07-05 13:50
sky_yang_sky
Rank: 3Rank: 3
等 级:论坛游民
威 望:8
帖 子:481
专家分:16
注 册:2007-5-30
收藏
得分:0 

那你可以用一個其它事件來觸發你的另一個動作呀,不一定兩個非要用CLICK事件呀


你微笑的面對整個世界,整個世界也將會微笑的面對你。
2007-07-05 14:01
yangqiu926
Rank: 1
等 级:新手上路
帖 子:11
专家分:0
注 册:2007-7-2
收藏
得分:0 
因为事件太多了.一共有3个下拉菜单,三个菜单里分别有两个选项.必须,每个里选择一个,三个为一组发生一个事件.
2007-07-05 14:04
西山居士
Rank: 4
等 级:贵宾
威 望:11
帖 子:581
专家分:0
注 册:2007-4-21
收藏
得分:0 
不要钻牛角尖,思路开阔点,看如下代码;
Private Sub combo1_click()
Combo2.Clear
Select Case Combo1.Text
Case "广东"
Combo2.AddItem "广州"
Combo2.AddItem "深圳"
Case "山西"
Combo2.AddItem "太原"
Combo2.AddItem "榆次"
End Select
End Sub
Private Sub Combo2_Click()
Dim Combotext As String
Dim i As Integer
Combotext = Combo2.Text
For i = 0 To Combo2.ListCount - 1
If Combo2.List(i) = Combotext Then
MsgBox "是第 " & (i + 1) & " 项"
End If
Next
End Sub
Private Sub Form_Load()
Combo1.AddItem "广东"
Combo1.AddItem "山西"
End Sub

2007-07-05 16:59
yangqiu926
Rank: 1
等 级:新手上路
帖 子:11
专家分:0
注 册:2007-7-2
收藏
得分:0 
恩,谢谢~
2007-07-05 17:25
快速回复:还是Combo_Click()问题
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.018874 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved