MS Access的更高版本具有称为附件的字段类型。 这使用户可以将文档和图像“上载”到数据库中,以便将所有内容整齐地存储在一个位置。 但是,随着人们的访问能力的提高,人们发现这种新的字段类型会引起一些问题。 一个问题是,如果在“附件”字段中存储许多文档,则数据库的大小会大大增加。 第二个问题是,使用“附件”字段并不像使用常规文本或数字字段那样简单。 但是,许多用户使用“附件”字段的一件事是在其表单上显示图像。
本文提供了一种用于显示与记录关联的图像的替代方法。
假设您有一个表格
frmCoolCars
。
主表tblCars
中的每个记录都有与该记录关联的汽车的图像。
可以将映像保存到公共位置,而不是将映像上传到数据库。
例如, C:\Users\twinnyfo\Documents\DB\Cars\Images\
。
在表中创建一个名为CarImage
的附加文本字段。
在该字段中,输入图像的提取路径和文件名: C:\Users\twinnyfo\Documents\DB\Cars\Images\Ferarri .jpg
。
现在,只需将图像控件添加到表单中(
imgCar
)。
将.PictureType
属性设置为链接,但请确保不为.Picture
属性添加任何内容。
这是稍后。
现在,在窗体的OnCurrent事件中,添加以下代码;
Private Sub Form_Current()
On Error GoTo EH
Me.imgCar.Picture = Me.CarImage
Exit Sub
EH:
MsgBox "There was an error going to the current record!" & vbCrLf & vbCrLf & _
"Error: " & Err.Number & vbCrLf & _
"Description: " & Err.Description & vbCrLf & vbCrLf & _
"Please contact your Database Administrator.", vbCritical, "WARNING!"
Exit Sub
End Sub
关于这一点没有什么“火箭科学”,但非常有用。
请记住,在设置图像文件之前,您可能需要仔细检查几件事,例如确保图像存在。 您还可以在表单中添加代码以浏览图像文件并保存该位置/文件名,甚至可以为一条记录添加多个图像。
但是 ,本文只是基础知识的快速入门,以防万一您想做这样的事情,因此所有钟声都被删除了。