重庆分公司,新征程启航
为企业提供网站建设、域名注册、服务器等服务
比如要让指定的图片显示在picture1图片框中:
创新互联公司自成立以来,一直致力于为企业提供从网站策划、网站设计、网站设计、成都网站建设、电子商务、网站推广、网站优化到为企业提供个性化软件开发等基于互联网的全面整合营销服务。公司拥有丰富的网站建设和互联网应用系统开发管理经验、成熟的应用系统解决方案、优秀的网站开发工程师团队及专业的网站设计师团队。
Picture1.Picture = LoadPicture("e:\tmp\1.jpg")
VB调用图片步骤如下:
1、建立一个图像框,名字改为p1,建立一个命令按钮。
2、双击命令按钮,进入代码编辑器,p1.Picture = LoadPicture("D:\My Documents\新建文件夹 (2)\1.jpg")
3、点击运行
4、点击命令按钮,图片显示出来了。
扩展资料
返回图片对象。
LoadPicture([filename], [size], [colordepth],[x,y])
LoadPicture 函数语法有下列部分:
size 可选变体。如果 filename 是光标或图标文件,指定想要的图象大小。
colordepth 可选变体。如果 filename 是一个光标或图标文件,指定想要的颜色深度。
x 可选变体,如果使用 y ,则必须使用。如果 filename 是一个光标或图标文件,指定想要的宽度。在包含多个独立图象的文件中,如果那样大小的图象不能得到时,则使用可能的最好匹配。只有当 colordepth 设为 vbLPCustom 时,才使用X 和 Y值。y 可选变体,如果使用 x, 则必须使用。
如果 filename 是一个光标或图标文件,指定想要的高度。在包含多个独立图象的文件中,如果那样大小的图象不能得到时,则使用可能的最好匹配。
能匹配的文件有 (.emf)、BMP(.bmp)、GIF (.gif) 文件和 JPEG (.jpg) 文件。
有三种方法:
1、添加一个picturebox或imagebox,在属性窗口中选择picture属性,然后就可以添加图片了,这是最简单的一种;
2、第二种是代码加入:
Option Explicit
Private Sub Form_Load()
Me.Picture = LoadPicture("c:\text.bmp") 'c:\text.bmp为图片路径
End Sub
3、第三种是通过剪贴板加入,这种比较复杂,如:
Option Explicit
Private Sub Form_Load()
Clipboard.SetData Picture1.Image
End Sub
会用VBA吗,先在word里面插入图片录制宏,然后将录制的VBA代码修改成点虐 代码就可以了
me.backgroundimage=image.fromfile(apppath+"picture")
主要的错误是你的"picture"这里错了,apppath后面就应该接你要载入的图片的名字,比如说是02.jpeg,那就应该是
me.backgroundimage=image.fromfile(apppath+"\02.jpeg"),注意要加\和图片的后缀名。