vb调用图片代码，详细

比如要让指定的图片显示在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)可以用CommonDialog控件(CommonDialog1.ShowOpen)

(2)

取RGB值的话，可以用Point取(

Picture1.Point(i,j)

)，得到一个颜色值，然告衡后通过下面的运算算冲友棚散则出来。(r红

g绿

b蓝)

color=Picture1.Point(i,j)

r

=

(color

Mod

65536)

Mod

256

g

=

(color

Mod

65536)

Mod

256

b

=

color

\

65536

然后rr

gg

bb就很好搞了

rr=255-r

gg=255-g

bb=255-b

SavePicture

Picture1.picture,"C:\123.jpg"册伍

'生成图片

SetAttr

“州弊或C:\123.jpg",vbReadOnly

'设置属卜茄性只读

---