答案：Image1.Picture = LoadPicture(cdg1.filename)
image1.picutre的属性是图片属性，你不能直接拿字符串赋值，应该用LoadPicture函数加载图片。
MSDN帮助如下：
LoadPicture 函数
将图形载入到窗体的 Picture 属性、PictureBox 控件或 Image 控件。
语法
LoadPicture([filename], [size], [colordepth],[x,y])
LoadPicture 函数语法有下列部分：
部分 描述
filename 可选的。字符串表达式指定一个文件名。可以包括文件夹和驱动器。如果未指定文件名，LoadPicture 清除图象或 PictureBox 控件。
size 可选变体。如果 filename 是光标或图标文件，指定想要的图象大小。
colordepth 可选变体。如果 filename 是一个光标或图标文件，指定想要的颜色深度。
x 可选变体，如果使用 y ，则必须使用。如果 filename 是一个光标或图标文件，指定想要的宽度。在包含多个独立图象的文件中，如果那样大小的图象不能得到时，则使用可能的最好匹配。只有当 colordepth 设为 vbLPCustom 时，才使用X 和 Y值。For icon files 255 is the maximum possible value
y 可选变体，如果使用 x， 则必须使用。如果 filename 是一个光标或图标文件，指定想要的高度。在包含多个独立图象的文件中，如果那样大小的图象不能得到时，则使用可能的最好匹配。For icon files 255 is the maximum possible value
设置值
size 的设置值为：
常量 值 描述
vbLPSmall 0 系统小图标。
vbLPLarge 1 系统大图标，由视频驱动程序决定。
vbLPSmallShell 2 外壳小图标大小，由“控制面板”中的 Display Properties 对话框中 Appearance 选项卡上的 Caption Buttons 的大小设置决定。
vbLPLargeShell 3 外壳大图标大小，由“控制面板”中的 Display Properties 对话框中 Appearance 选项卡上的图标大小设置决定。
vbLPCustom 4 自定义大小，由 x 和 y 参数提供值。
colordepth 的设置值为：
常量 值 描述
vbLPDefault 0 如果使用指定文件，则为最佳可用匹配。
vbLPMonochrome 1 2 色。
vbLPVGAColor 2 16 色。
vbLPColor 3 256 色。
上一个：vb编的图书馆管理系统的源代码
下一个：vb6 中利用api 关机问题
