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

Posted 2023-04-16

参考技术A 鉴于你新手简而言之
代码控制图片框中图片的尺寸
双击图片框
代码如下：
picture1.picture=loadpicture("图片路径")
picture1.autosize=Ture 参考技术B 若按money0_0所说，便将image的Stretch属性定为True，然后通过调整Image的Height和Width属性来控制。
如果非用Picture不可，可以用PaintPicture方法将图片重新画在界面上。
用法：
Picture1.PaintPicture LoadPicture(图片绝对路径), 0, 0, 宽,高 参考技术C 用 PictureBox 肯定是可以的，但我猜想你只是想显示一下而已，那为什么不用 Image 控件呢？
尝试一下 Image 控件的 Stretch 属性吧。 参考技术D 改一下size数字就行了 第5个回答  2011-01-19 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本回答被提问者采纳

请问C# winform使用pcitruebox控件查看图片如何实现放大，缩小功能？

请问C# winform使用pcitruebox控件查看图片如何实现放大，缩小功能？

参考技术A 设定
this.pictureBox1.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage;

然后通过按钮或者其他期望的操作方式，比如鼠标滚轮进行放大缩小
private void pictureBox1_MouseWheel(object sender, System.Windows.Forms.MouseEventArgs e)

System.Drawing.Size t = pictureBox1.Size;
if (e.Delta < 0)

this.pictureBox1.Width = this.pictureBox1.Width * 9 / 10;
this.pictureBox1.Height = this.pictureBox1.Height * 9 / 10;

else

this.pictureBox1.Width = this.pictureBox1.Width * 11 / 10;
this.pictureBox1.Height = this.pictureBox1.Height * 11 / 10;

本回答被提问者采纳 参考技术B 你要实现什么效果呢：
1.图片变大，pcitruebox也变大。
2.图片变大，pcitruebox不变大。（类似放大镜） 参考技术C 你希望的是怎么个放大缩小功能？