请问vb的image控件可以改变图像大小后保存吗？

Question

image控件可以调整图片大小来适应控件的大小，我想把缩小的图片保存下来，作下一步处理，但我保存发现还是没改变大小的原始图片。

Answer 1

在窗體上加兩個COMMANDBUTTON﹐一個COMMONDIALOG﹐兩個PICTUREBOX
然后在代碼里寫﹕
Private Sub Command1_Click()
'打開源文件
Me.CommonDialog1.ShowOpen
Me.Picture1.Picture = LoadPicture(Me.CommonDialog1.FileName)
Me.Picture2.AutoRedraw = True
Me.Picture2.PaintPicture Me.Picture1.Picture, 0, 0, Me.Picture2.ScaleWidth, Me.Picture2.ScaleHeight
End SubPrivate Sub Command2_Click()
'保存改變大小后的文件
Me.CommonDialog1.ShowSave
SavePicture Me.Picture2.Image, Me.CommonDialog1.FileName
End Sub

Answer 2

好像不行，你可以用picturebox试试看，

Answer 3

IMAGE改变的只是给你一个效果,保存的还是原图片,用PICTUREBOX控件通过PAINTPICTURE函数来改变大小,这样保存的就是看到的效果了!