如何双击图象打开原始大小图片?

zjmcwl · 发表于 2005-4-22 17:36:00

有时候图片比图象框大,多余部分被剪去用拉伸缩放又导致图片失真,请问在图象DblClick中加入什么代码能查看原始大小图片?

Trynew · 发表于 2005-4-22 22:28:00

新建一个窗体：

Private Sub Form_Open(Cancel As Integer)
Me.图像.PictureData = Forms("表1").图像.PictureData
Me.主体.Height = Me.图像.ImageHeight
Me.图像.Width = Me.图像.ImageWidth
Me.图像.Height = Me.图像.ImageHeight
End Sub

zjmcwl · 发表于 2005-4-22 23:52:00

强,不过最强的还是那张钞票.............

zjmcwl · 发表于 2005-4-23 00:15:00

再问一个问题,因为我这个窗口的图片不是绑定的,如果为空的时候双击了会出错,请问怎么办啊?

maximgary · 发表于 2007-2-26 19:48:00

把像框的属性设置为缩小

帐号		自动登录	找回密码
密码			注册

群介绍
Access培训群 (792054000)
Access免费培训2群 (163530137)
Access免费培训群 (833510950)
Access免费培训群2 (792054000)
Access交流总群 (5004108)

主题相关群

地区相关群[您还没设置居住地]

[其它] 如何双击图象打开原始大小图片?

本帖子中包含更多资源

本帖子中包含更多资源

群介绍
主题无相 (随机显示版	同地区群块其他地区)