| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1197 人关注过本帖
标题:[求助]如何自由插入图片到图片框
只看楼主 加入收藏
wjh98
Rank: 1
等 级:新手上路
帖 子:23
专家分:0
注 册:2006-12-4
收藏
 问题点数:0 回复次数:6 
[求助]如何自由插入图片到图片框

最近,爱上了vb6.0编程,自学了不少知识,我想设计一个窗体,上面是个人基本情况,如姓名,年龄等,加一个图像框,图像框上或旁边加三个按钮,一个为添加图像,一个为保存,一个为重新设置图像(重置),按了添加钮后,打开一个文件夹,让你选择一个图像文件,确认后,选定的图像便放在图像框上了。如果图像选错了,按重置,重新打开一个文件夹让你选择,如满意,按保存,整个个人基本情况便保存在电脑上了。请教专家们,如何编写这三个按钮代码。我的邮箱jh5898@sina.com

搜索更多相关主题的帖子: sina 图像 
2007-01-03 15:55
purana
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:广东-广州
等 级:版主
威 望:66
帖 子:6039
专家分:0
注 册:2005-6-17
收藏
得分:0 
只是使用个CommonDialog控件..选择一个图片文件..然后用LoadPicture就行了.

我的msn: myfend@
2007-01-03 16:10
wjh98
Rank: 1
等 级:新手上路
帖 子:23
专家分:0
注 册:2006-12-4
收藏
得分:0 
我是个初学者,版主能不能写详细点

2007-01-03 16:22
wjh98
Rank: 1
等 级:新手上路
帖 子:23
专家分:0
注 册:2006-12-4
收藏
得分:0 
有没有这方面的源代码供我研究一下。免得我走弯路

2007-01-03 16:26
purana
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:广东-广州
等 级:版主
威 望:66
帖 子:6039
专家分:0
注 册:2005-6-17
收藏
得分:0 
Picture1.Picture=Loadpicture("D:\aa.jpg")
这样就装入了aa.jpg图片...

这样..就是锁定了aa.jpg..
要想动态的..就可以用CommonDialog公用对话框控件..如果不知道的话..那我也没有办法.
...CommonDialog1.ShowOpen
Picture1.Picture=Loadpicture(CommonDialog1.FileName)

我的msn: myfend@
2007-01-03 16:27
wjh98
Rank: 1
等 级:新手上路
帖 子:23
专家分:0
注 册:2006-12-4
收藏
得分:0 
你们的效率真高,我先谢谢你了,回去再试试吧

2007-01-03 16:35
wjh98
Rank: 1
等 级:新手上路
帖 子:23
专家分:0
注 册:2006-12-4
收藏
得分:0 
我找到方法了
1.引用控件commondialog ,
2.在窗体上插入commondialog,image,command控件
3.编写command代码.如下
Private Sub Command1_Click()
CommonDialog1.FileName = ""
CommonDialog1.Filter = "图片文件(*.jpg,*ico,*bmp)" '可要可不要
CommonDialog1.ShowOpen

If CommonDialog1.FileName <> "" Then
Image1.Picture = LoadPicture(CommonDialog1.FileName)
End If
End Sub

 试下吧
FqyM61qM.rar (1.61 KB) 我找到方法了


[此贴子已经被作者于2007-1-5 10:19:10编辑过]


2007-01-05 10:16
快速回复:[求助]如何自由插入图片到图片框
数据加载中...
 
   



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

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