读书人

image升缩模式,该怎么解决

发布时间: 2012-03-08 13:30:13 作者: rapoo

image升缩模式
我用image控件放一幅图片. 用一个复选框来选择是否有自动拉伸功能.
Private Sub Check1_Click()
If Check1.Value = 1 Then
Image1.Stretch = True
Image1.Refresh
Else
Image1.Stretch = False
Image1.Refresh
End If
End Sub
发现装载一幅图片后. 点击复选框可以从拉伸模式转到正常模式. 却无法从正常模式转到拉伸模式. 不知道是否哪里设置错了?

[解决办法]
能从正常模式转到拉伸模式,只不过Image1尺寸变得刚刚好。要从新指定Image1尺寸,如:
Image1.Width = 5000
Image1.Height = 3000
Image1.Stretch = True

读书人网 >VB

热点推荐