用VB制作一个小程序,程序打开后载入电脑里的图片,但是把程序发到其他电脑打开无法找到图像文件

用VB制作一个小程序,程序打开后载入电脑里的图片,但是把程序发到其他电脑打开无法找到图像文件,第1张

简单的方法是使用资源(文件),

在VB6的菜单,[外接程序] -- [外接工序管理器] ;选中 VB6 资源编辑器,勾选 “加载/卸载”,[确定]

见下图:

在菜单[工具] -- [资源编辑器],单击[添加位图],见下图

把需要的位图文件添加到资源里。然后单击保存,完成资源文件保存。

这样,在使用框的加载的函数的时候使用语句:

Image1Picture = LoadResPicture(101, 0)

其中101是你刚才添加到资源里的资源的Id号,

这样的方法,资源文件是包含在 EXE里了,所以改变计算机或者路径,不会有问题。

当然,如果用你原来的方法,那么你在编辑代码状态使用的加载的路径是怎样的,在其他计算机里也必须在相同路径里要有该文件。

有个控件叫 Imagelist 的,可一次添加多张。

Private Sub Command1_Click()

Image1Picture = ImageList1ListImages(1)Picture

Picture1Picture = ImageList1ListImages(2)Picture

End Sub

Private Sub Form_Load()

MePicture = ImageList1ListImages(3)Picture

End Sub

1)在窗体添加一个Image图像框控件。在它得属性页设置Stretch属性为True。

Stretch 属性,返回或设置一个值,该值用来指定一个图形是否要调整大小,以适应与 Image 控件的大小。如果 Stretch 被设置为 True,那么,控件大小的调整使得它所包含的图形的大小也要调整。

2)在代码中加入如下语句:

Private Sub Form_Resize()

    Image1Height = MeHeight

    Image1Width = MeWidth

End Sub

Resize事件,当一个对象第一次显示或当一个对象的窗口状态改变时该事件发生。(例如,一个窗体被最大化、最小化或被还原。)

3)在Image控件的Picture属性连接需要或在程序代码中使用LoadPicture 函数将图形载入到Image控件的 Picture 属性。

使用Shell函数来调用外部的应用程序。

Shell 函数

执行一个可执行文件,返回一个 Variant

(Double),如果成功的话,代表这个程序的任务 ID,若不成功,则会返回 0。

Shell 函数示例

本示例使用 Shell 函数来完成一个用户指定的应用程序。

' 将第二个参数值设成 1,可让该程序以正常大小的窗口完成,并且拥有焦点。

Dim RetVal

RetVal = Shell("C:\WINDOWS\system32\CALCEXE", 1)   ' 完成Calculator。

以上就是关于用VB制作一个小程序,程序打开后载入电脑里的图片,但是把程序发到其他电脑打开无法找到图像文件全部的内容,包括:用VB制作一个小程序,程序打开后载入电脑里的图片,但是把程序发到其他电脑打开无法找到图像文件、VB 中如何把图片直接保存在程序中而不是去电脑中调用(寻找传说中的高手)、vb的窗体背景如何设成图片等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!

欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/zz/9708888.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-01
下一篇 2023-05-01

发表评论

登录后才能评论

评论列表(0条)

保存