| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1951 人关注过本帖
标题:[求助]combobox的问题
只看楼主 加入收藏
44555000
Rank: 1
等 级:新手上路
帖 子:13
专家分:0
注 册:2004-8-28
收藏
 问题点数:0 回复次数:10 
[求助]combobox的问题

我是一刚学VB的新手,我想请高手指点一下combobox的具体用法,我只知道设置属性,但具体的用法不是很清楚,我想用组合框来调用图片.请高手指教一下.

搜索更多相关主题的帖子: combobox 
2004-09-04 11:14
griefforyou
Rank: 6Rank: 6
等 级:贵宾
威 望:27
帖 子:3336
专家分:0
注 册:2004-4-15
收藏
得分:0 

combobox是最基本的控件了,你都不会,先看看书吧。

组合框来调用图片是什么意思?


天津网站建设 http://www./
2004-09-04 15:36
ganyuclok
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2004-8-21
收藏
得分:0 

combobox 的选向要用代码书写

调用要用到调用图片控件

2004-09-05 10:59
44555000
Rank: 1
等 级:新手上路
帖 子:13
专家分:0
注 册:2004-8-28
收藏
得分:0 

我的意思是用combobox做一个选项,然后在选中时,在Image控件中显示图片出来.

我就是一直找不到关于操作combobox控件的一些的代码,就只知道设置控件的属性.

请高手指教在哪里可以找到,或者写一段出来举例说明一下也行啊.谢谢!

2004-09-06 06:30
griefforyou
Rank: 6Rank: 6
等 级:贵宾
威 望:27
帖 子:3336
专家分:0
注 册:2004-4-15
收藏
得分:0 

Private Sub Form_Load() Combo1.AddItem "C:\Picture1.jpg" Combo1.AddItem "C:\Picture2.jpg" Combo1.AddItem "C:\Picture3.jpg" Combo1.AddItem "C:\Picture4.jpg" End Sub

Private Sub Combo1_Change() Image1.Picture=LoadPicture("Combo1.Text") End Sub

[此贴子已经被作者于2004-09-07 20:36:39编辑过]


天津网站建设 http://www./
2004-09-07 20:36
44555000
Rank: 1
等 级:新手上路
帖 子:13
专家分:0
注 册:2004-8-28
收藏
得分:0 

先谢谢了

2004-09-08 03:30
一梦三四年
Rank: 1
等 级:新手上路
帖 子:21
专家分:0
注 册:2004-9-22
收藏
得分:0 

Image1.Picture=LoadPicture("Combo1.Text")

有必要加双引号吗?


这是一个多美丽又遗憾的世界 这是一个不能停留太久的世界
2004-09-24 18:40
随意魔
Rank: 1
等 级:新手上路
帖 子:184
专家分:0
注 册:2004-5-13
收藏
得分:0 
以下是引用grief在2004-09-07 20:36:00的发言:

Private Sub Form_Load() Combo1.AddItem "C:\Picture1.jpg" Combo1.AddItem "C:\Picture2.jpg" Combo1.AddItem "C:\Picture3.jpg" Combo1.AddItem "C:\Picture4.jpg" End Sub

Private Sub Combo1_Change() Image1.Picture=LoadPicture("Combo1.Text") End Sub

以上程序代码错误有两处(我想是他没调试过吧): 1、Image1.Picture=LoadPicture("Combo1.Text") 其中:Combo1.Text 是不用加双引号的 2、Private Sub Combo1_Change() 如上所言,代码Image1.Picture=LoadPicture(Combo1.Text) (这里是已更正的代码) 把它放在Change事件中,无论是Picture控件还是Image控件都是显示不出图片的,应放在Click单击事件中。 以下为个人简单编了一个示例: 所需控件:一个ComboBox,一个PictureBox 控件属性设置:Combo1设置基Style为2 源代码: Private Sub Combo1_Click() Picture1.Picture = LoadPicture(Combo1.Text) End Sub

Private Sub Form_Load() '以下图片仅本机所有,你可以用你的图片所在的位置 Combo1.AddItem ("F:\力\00000000000.jpg") Combo1.AddItem ("F:\力\love.jpg") Combo1.ListIndex = 0 End Sub 运行后如下图: [IMG]C:\Documents and Settings\Owner\My Documents\My Pictures\VB解答2.JPG[/IMG] [IMG]C:\Documents and Settings\Owner\My Documents\My Pictures\VB解答3.JPG[/IMG]

[此贴子已经被作者于2004-09-27 19:26:56编辑过]


.-_-.曾经拥有.足以泪流.-_-.
2004-09-27 19:10
五月天
Rank: 1
等 级:新手上路
帖 子:181
专家分:0
注 册:2004-4-20
收藏
得分:0 
随意魔很认真啊,顶一个~

啦~啦~啦~~
2004-09-29 12:59
lvlink
Rank: 1
等 级:新手上路
帖 子:82
专家分:0
注 册:2004-9-20
收藏
得分:0 

随意魔 真棒

我顶

2004-10-14 20:30
快速回复:[求助]combobox的问题
数据加载中...
 
   



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

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