在Access中显示大图片示例(第2版)

来源:www.accessoft.com 点击数:9210 　 | 收藏 | 复制

时　间:2014-01-02 11:23:14
作　者:t小雨 ID：4598 城市：柳州
摘　要:在Access中显示大图片示例(第2版)
正　文:

原来做的示例，有网友反映在2002-2003的mdb格式和accdb格式中有问题，原来是用户窗体的Frame控件在这些版本中竞然不能使用。
由于Access的窗体和控件尺寸大小有限制，没法完整显示较大图片，想想这个功能大家还是偶尔会用到，于是重新做了一个，测试在2010中可用。
还是用的用户窗体，如果要在你的程序中使用，请将示例中的用户窗体从vba编辑器中导出为frm文件，再打开你的库在vba编辑器中导入。

原贴地址：http://www.accessoft.com/blog/article-show.asp?userid=4598&Id=6026
原贴内容：

有网友数据库使用了超大的图片(比屏幕还要大)，因为希望看得清楚一点(或者说以实际大小查看图片)，图片框要以剪裁的方式来显示图片，但图片框没有滚动条，就不能完整看到图片了。
简单有效的解决办法是调用 windows 图片和传真查看器打开图片，只一行代码：

Shell "rundll32.exe shimgvw.dll,imageview_fullscreen " & Me.照片图像.Picture

但那也不是唯一的办法，挖掘Access自身的潜力仍然可曲径通幽，以下是本人作的示例，可放大缩小或以实际大小显示图片，超出部分可拖动滚动条显示。

代码集成在一个模块，调用很简单，也是一行代码：

ImageView.LoadPicFromFile Me.照片图像.Picture

附件:

显示图片示例 1.1.rar