Question

vb 如何放大或缩小图片，用Picture控件

Answer 1

鉴于你新手简而言之
代码控制图片框中图片的尺寸
双击图片框
代码如下：
picture1.picture=loadpicture("图片路径")
picture1.autosize=Ture

Answer 2

若按money0_0所说，便将image的Stretch属性定为True，然后通过调整Image的Height和Width属性来控制。
如果非用Picture不可，可以用PaintPicture方法将图片重新画在界面上。
用法：
Picture1.PaintPicture LoadPicture(图片绝对路径), 0, 0, 宽,高

Answer 3

用 PictureBox 肯定是可以的，但我猜想你只是想显示一下而已，那为什么不用 Image 控件呢？
尝试一下 Image 控件的 Stretch 属性吧。

Answer 4

改一下size数字就行了

Answer 5

Private Sub Command1_Click()
Picture1.Width = Picture1.Width + 50
Picture1.Height = Picture1.Height + 50
Picture1.PaintPicture Picture1, 0, 0, Picture1.Width, Picture1.Height
End Sub

Private Sub Command2_Click()
Picture1.Width = Picture1.Width - 50
Picture1.Height = Picture1.Height - 50
Picture1.PaintPicture Picture1, 0, 0, Picture1.Width, Picture1.Height
End Sub

Private Sub Form_Load()
Picture1.Picture = LoadPicture("d:\fafa.jpg")
Picture1.AutoSize = True
End Sub