Access数据库支持OLE对象字段,其中最常用的是BMP对象,即图片对象。图片对象的加入使Access数据库的可用性得到大大提高,它使数据库不仅仅局限于传统意义上的数据(即数值与字符),提高了信息的质量,并更接近于人们日常生活中的媒体。例如,要作产品介绍,需要保存该产品的图片。图片往往具有比文字更大的说服力。
然而,直接采用VB等开发工具将Access数据库中的图片对象取出来显示到屏幕上并实现打印输出并不容易。这儿介绍一个简单方法,只用几行代码即可将图片对象显示到屏幕上,并支持图片的缩放,高质量的打印输出。这需要借助CELL组件。
下面举一个在VB中使用CELL组件显示Access数据库中的图片对象的例子。创建一个Form之后,将CELLActiveXControlmodule选中,就把CELL组件添加入控件栏中了,将CELL组件加入Form,在Form的Load过程中加入以下代码
PrivateSubForm_Load()
Cell1?DoOpenDbase0,″e:\tmp\sample?mdb″,tables
Cell.1DoDumpDbaseData″Select*fromemployees″,0,0,0,1,cols,rows
EndSub
e:\tmp\sample?mdb是一个含有图片的Access数据库,运行程序就可将其中的图片显示到表格中并打印出来(如下图)。根据SELECT语句的灵活性,你可以将指定的图片显示到表格的任意位置之上。采用CELL组件还有一个好处就是CELL组件强大的打印功能,CELL组件对图片进行无级缩放,使打印出来的图片不失真。
CELL组件试用版可在站点免费下载。(编者注:CELL组件3.1+完全试用版已收录在《PC世界3》上了)
用CELL组件显示Access数据库的图片对象
80酷酷网 80kuku.com