[已解决]Image控件问题

suxiong · 发表于 2013-11-14 11:14

本帖最后由 suxiong 于 2013-11-15 10:10 编辑

1、LoadPicture后能让图片按Image的大小显示吗？
2、LoadPicture后因为图片可能比Image控件的尺寸要大，能不能在Image显示拉动条呢？

两个问题，麻烦大家说下怎么设置，如果不行，其它控件可以吗？

谢谢！

t.zip (31.72 KB, 下载次数: 6)

suxiong · 发表于 2013-11-14 19:55

汗，没有人回复下吗！

那么的帅 · 发表于 2013-11-14 20:02

suxiong 发表于 2013-11-14 19:55
汗，没有人回复下吗！

没附件，无法解答

suxiong · 发表于 2013-11-14 20:59

那么的帅发表于 2013-11-14 20:02
没附件，无法解答

t.zip (31.72 KB, 下载次数: 2)

那么的帅 · 发表于 2013-11-14 21:51

suxiong 发表于 2013-11-14 20:59
麻烦了！

Private Sub CommandButton1_Click()
With Image1
.Picture = LoadPicture(ThisWorkbook.Path & "\Snap1.jpg")
.PictureSizeMode = fmPictureSizeModeStretch '扩展图片使其填满窗体或页面。该设置值使图片在垂直和水平方向都发生变形。
End With
End Sub

suxiong · 发表于 2013-11-14 22:10

那么的帅发表于 2013-11-14 21:51
Private Sub CommandButton1_Click()
With Image1
.Picture = LoadPicture(ThisWorkbook.P ...

嗯，谢谢；是可以了。但不能不能不变形呢；

比如能不能在Image显示拉动条呢？左右与上下拉动，这样就不变行了。

dongqing1998 · 发表于 2013-11-14 23:53

可以用WEBBROWSER控件，参考附件自己修改吧。

dongqing1998 · 发表于 2013-11-15 03:22

这个最佳答案由 dongqing1998 给出，感谢 dongqing1998 的回答。

单击隐藏图章

重新做了一个附件。

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