鼠标滚动实现pictureBox缩放 大家好，这是我用鼠标滚动轮实现图片缩放的代码，我将pictureBox放在一张tabpage里，现在的问题是缩放比例不能按照tabpage大小而改变，有时候缩小只显示在tabpage的左部分，实在搞不定了，请高手指点下啊 （我将pictureBox的sizemode设置的是strechimage,改成别的sizemode也不对） Private Sub PictureBox1_MouseEnter(ByVal sender As Object,ByVal e As System.EventArgs) Handles PictureBox1.MouseEnter PictureBox1.Focus() End Sub Private Sub PictureBox1_MouseWheel(ByVal sender As Object,ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox1.MouseWheel PictureBox1.Width += e.Delta PictureBox1.Height += e.Delta End Sub __________________________________________________________________________ 呵呵，sizemode　设置为：zoom 试过没。不过不行，那就要用GDI+了。比较麻烦。 ———————————————————————— 简简单单，平平安安，朴朴素素，快快乐乐。 __________________________________________________________________________ 楼上高手，能给个例子借鉴下吗 __________________________________________________________________________ 是不是要 Reflash __________________________________________________________________________ 给你我写的例子： VB.Net程序设计:Image图片处理 GDI+绘图技术 http://blog.csdn.net/linjimu/archive/2008/09/17/2942379.aspx 用到的知识点： 获取图片的缩略图 鼠标拽区，截取图片的指定区域 在Panel控件上绘图，绘制鼠标拽出来的矩形。双重缓存的运用。Invalidate、Paint重绘控件。 Bitmap，Image，Rectangle运用。 里面也有图片的放大缩小问题。 __________________________________________________________________________ 各位高手，现在出现的问题是：pictureBox缩小到没有时，再进行放大，就会出现pictureBox大小不能按照tabpage大小改变而改变，当pictureBox不缩小到没有时，pictureBox大小就能按照tabpage大小改变而改变，请问高手们这是怎么回事啊 __________________________________________________________________________ 你缩小设定一个最小值。不要“缩小到没有”。 __________________________________________________________________________ 原文链接：https://www.f2er.com/vb/264125.html