VB在数据库中添加图片

1 数据表中增加一个字段，存放图片的路径和文件名，如“c:\pic\a001.jpg"

2 显示在image1时使用：Me.Picture1.Picture = LoadPicture(字段)

你这个问题我估计是你用的是老版vb6.0，而数据库版本是新版本2000或以上。

以下是解决你这个问题的有效方法：

.关于老版VB6.0不支持Access2000以上版本的解决办法

.方法1.在Access中的工具-->数据库实用工具-->转换数据库-->到早期的Access（97）数据库版本,然后在vb中调用此Access数据库。

.方法2.下载安装补丁VB6 SP5，然后在VB6.0中选Access2000。

.方法3.不要用Data1控件，改用ADO控件连接数据库(Access2000以上)。

.如果你的数据库是新创建的数据库，没有很多数据，建议你用方法2最好；如果是具有大量数据而又不想安装vb补丁就用方法1，将数据库的格式调成97版就可以啦。

---