设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
查看: 31521|回复: 94
打印 上一主题 下一主题

[模块/函数] 在Access中显示大图片示例

[复制链接]

点击这里给我发消息

跳转到指定楼层
1#
发表于 2011-11-9 14:47:35 | 只看该作者 回帖奖励 |正序浏览 |阅读模式
有网友数据库使用了超大的图片(比屏幕还要大),因为希望看得清楚一点(或者说以实际大小查看图片),图片框要以剪裁的方式来显示图片,但图片框没有滚动条,就不能完整看到图片了。

简单有效的解决办法是调用 windows 图片和传真查看器打开图片,只一行代码:

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

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

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

    ImageView.LoadPicFromFile Me.照片图像.Picture

游客,如果您要查看本帖隐藏内容请回复

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏1 分享分享 分享淘帖 订阅订阅
96#
发表于 2023-11-15 20:52:18 | 只看该作者
学习下,谢谢
95#
发表于 2023-9-25 14:25:24 | 只看该作者
学习学习
回复

使用道具 举报

94#
发表于 2022-12-4 20:06:42 | 只看该作者
1111111
回复

使用道具 举报

点击这里给我发消息

93#
发表于 2022-4-30 12:09:16 | 只看该作者
进来学习
回复

使用道具 举报

点击这里给我发消息

92#
发表于 2020-11-24 10:18:37 | 只看该作者
学习
回复

使用道具 举报

点击这里给我发消息

91#
发表于 2020-2-9 21:53:34 | 只看该作者
回复

使用道具 举报

90#
发表于 2019-6-18 17:07:10 | 只看该作者
谢谢分享
回复

使用道具 举报

89#
发表于 2019-4-4 11:15:06 | 只看该作者
谢谢分享!
回复

使用道具 举报

88#
发表于 2018-3-2 18:09:30 | 只看该作者
进来学习
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-11-25 07:51 , Processed in 0.138004 second(s), 36 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表