怎么在代码中清空picture1的图片内容 - VB6论坛 - 编程论坛

| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛 |

编程论坛 → 开发语言 → 『 VB6论坛』 → 怎么在代码中清空picture1的图片内容

我的收件箱(0)

欢迎加入我们，一同切磋技术

共有 6898 人关注过本帖， 1 人收藏

标题：怎么在代码中清空picture1的图片内容

只看楼主加入收藏

梦心

帅哥哟，离线，有人找我吗？

Rank: 4

来　自：福建平和
等　级：贵宾
威　望：13
帖　子：1910
专家分：0
注　册：2007-5-11
结帖率：100%

收藏(1)

问题点数：0 回复次数：6

怎么在代码中清空picture1的图片内容

如题
Private Sub List1_Click()
If (Dir(List1.Text) <> "") Then
Picture1.Picture = LoadPicture(List1.Text)
Else
Picture1.Picture = LoadPicture("") －－－－这代码实现不了
MsgBox "图片文件未找到", 48, "提示"
End If
End Sub
我想在图片未找到的时候清空图片框的预览～怎么办？

ps：不要告诉我在属性里面做，我要求是在代码里面完成。像Picture1.Picture = ""或者Picture1.Picture = LoadPicture()等都不行！

搜索更多相关主题的帖子: 代码　

发帖时间

2007-10-03 11:32

multiple1902

帅哥哟，离线，有人找我吗？

Rank: 8

Rank: 8

等　级：贵宾
威　望：42
帖　子：4881
专家分：671
注　册：2007-2-9

收藏

得分:0

[CODE]Picture1.Picture=Nothing[/CODE]
好好看看书。你要的效果无非是把Picture1属性改为空对象。

发帖时间

2007-10-03 11:57

qwaszwc

帅哥哟，离线，有人找我吗？

Rank: 1

等　级：新手上路
帖　子：74
专家分：0
注　册：2007-9-29

收藏

得分:0

picture1.picture=loadpicture()应该也可以的,我就试过用按钮加载一个图片,用另一个按钮加上述命令就可以搞定.

发帖时间

2007-10-03 17:24

multiple19O2

帅哥哟，离线，有人找我吗？

Rank: 1

等　级：新手上路
帖　子：326
专家分：0
注　册：2007-8-29

收藏

得分:0

以下是引用qwaszwc在2007-10-3 17:24:37的发言：
picture1.picture=loadpicture()应该也可以的,我就试过用按钮加载一个图片,用另一个按钮加上述命令就可以搞定.

可行。

Function LoadPicture([FileName], [Size], [ColorDepth], [X], [Y]) As IPictureDisp
Member of VB.Global
Loads a graphic into a Form, PictureBox, or Image control.

发帖时间

2007-10-03 17:32

浅色的回忆

美女呀，离线，留言给我吧！

Rank: 1

等　级：新手上路
帖　子：139
专家分：0
注　册：2007-6-24

收藏

得分:0

以下是引用梦心在2007-10-3 11:32:53的发言：

如题
Private Sub List1_Click()
If (Dir(List1.Text) <> "") Then
Picture1.Picture = LoadPicture(List1.Text)
Else
Picture1.Picture = LoadPicture("") －－－－这代码实现不了
MsgBox "图片文件未找到", 48, "提示"
End If
End Sub
我想在图片未找到的时候清空图片框的预览～怎么办？

ps：不要告诉我在属性里面做，我要求是在代码里面完成。像Picture1.Picture = ""或者Picture1.Picture = LoadPicture()等都不行！

你这句话错了,是可以的.

发帖时间

2007-10-03 19:47

梦心

帅哥哟，离线，有人找我吗？

Rank: 4

来　自：福建平和
等　级：贵宾
威　望：13
帖　子：1910
专家分：0
注　册：2007-5-11

收藏

得分:0

解决了！谢谢！！

我清高和我骄傲的倔强，在风中大声的唱：我不听，我不听~~做我自己最特别，呼呼~~啦啦~~~
我的博客园地址： [url]http://[/url]

发帖时间

2007-10-04 11:24

张zzl

帅哥哟，离线，有人找我吗？

Rank: 1

等　级：新手上路
帖　子：1
专家分：0
注　册：2016-10-14

收藏

得分:0

回复楼主梦心

picture.Cls

发帖时间

2016-10-14 00:41

快速回复：怎么在代码中清空picture1的图片内容

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

编程中国 版权所有，并保留所有权利。

Powered by Discuz, Processed in 0.031255 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved