| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 658 人关注过本帖
标题:[求助]combobox菜单简单问题。
只看楼主 加入收藏
windlf
Rank: 1
等 级:新手上路
帖 子:30
专家分:0
注 册:2005-11-27
收藏
 问题点数:0 回复次数:5 
[求助]combobox菜单简单问题。
一个combobox菜单,itemdata内容依次是0,1,2,3,4,5

Private Sub combo1_Click()
If combo1.Text <> "请选择 " Then
combo1.Enabled = False
End If
Label1.Caption = combo1.ItemData
End Sub


出错了。

怎样才能把combo1.itemdata里的数据读出来啊?
搜索更多相关主题的帖子: combobox 简单问题 菜单 
2006-12-26 20:47
学习VB才2天
Rank: 5Rank: 5
等 级:贵宾
威 望:16
帖 子:1653
专家分:0
注 册:2006-5-4
收藏
得分:0 
combo1.additem

[GLOW=255,DeepPink,3]我的免费网盘[/GLOW]
2006-12-26 20:50
purana
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:广东-广州
等 级:版主
威 望:66
帖 子:6039
专家分:0
注 册:2005-6-17
收藏
得分:0 

Private Sub Combo1_Click()
MsgBox Combo1.Text
End Sub

Private Sub Form_Load()
Dim i As Long
For i = 1 To 10
Combo1.AddItem i
Next
End Sub


我的msn: myfend@
2006-12-26 20:52
windlf
Rank: 1
等 级:新手上路
帖 子:30
专家分:0
注 册:2005-11-27
收藏
得分:0 
additem是添加啊。我都添加好了,在combo.list里依次是"a,b,c,d,e,f"combo.itemdata里依次是"0,1,2,3,4,5",怎样选择“a”是label1.caption显示“0”...依次选择“e”时label1.caption显示“4”呢?
如果additem能做怎么弄啊?
2006-12-26 20:54
purana
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:广东-广州
等 级:版主
威 望:66
帖 子:6039
专家分:0
注 册:2005-6-17
收藏
得分:0 

Private Sub Combo1_Click()
MsgBox Combo1.ListIndex
End Sub


我的msn: myfend@
2006-12-26 20:56
windlf
Rank: 1
等 级:新手上路
帖 子:30
专家分:0
注 册:2005-11-27
收藏
得分:0 
谢谢,解决了!
2006-12-26 20:58
快速回复:[求助]combobox菜单简单问题。
数据加载中...
 
   



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

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