VB多类图片数据库存取技巧

一、实现思路:

当用户添加或修改图片时，控制COMMONDIALOG的SHOWOPEN对话框，然后将通用对话框的文件名记录到变量A中，再使用APP。路径在特定目录中查找图片文件，并更改放置在窗体上的图片控件的属性以显示它。只有一个文本字段用于记录数据库中的变量A，图像文件存储在程序目录中。这种方法可以同时使用GIF，JPG和BMP图像文件。

二、实施方法:

1.在窗体上建立一个名为IMAGE1的图像控件。

2.用数据控件获取数据源表。

3.建立“更改图片”按钮命令1，其代码为:

私有子命令1_Click()

CommonDialog1文件名= " "

CommonDialog1Filter = "file bmp *。bmp文件JPG *。JPG文件GIF *。GIF "

CommonDialog1ShowOpen

将a作为字符串变暗

A = CommonDialog1FileTitle注释:获取不带路径的文件名。

如果一个“”那么

图11。图片= LoadPicture(App。路径& "\bmp\" & a)

注意:\bmp\是这个系统文件夹下的一个子文件夹，我用它来访问图片。

数据1。记录集.编辑

1.recordset.fields ("TP") =注意:TP是用于访问图片名称的字段。

数据1。记录集.更新

如果…就会结束

末端接头