vb中如何使用通用对话框打开任意图片

Question

如题所述

Answer 1

调用通用对话框中的打开功能
具体如下：
commandialog1.showopen
显示打开通用对话框
commandialog1.filter="type(*.jpg)|*.jpg|type(*.ico)|*.ico|type(*.bmp)|*.bmp"
'设置文件过滤器，可以把你所要打开的图像文件类型加上
commandialog1.filterindex=1
设置默认的文件过滤器
image1.picure=loadpicture(commandialog1.filename)
将选中的图片赋给image1的控件中，显示出来

Answer 2

加载通用对话框控件，步骤是 工程》部件》选择Microsoft CommonDialog control6.0。代码如下
sub command1_click()
commondialog1.showopen
picture1.picture=loadpicture(commondialog1.filename)
end sub
经验证，没问题。本回答被提问者采纳

Answer 3

做新手任务，请见谅！