鼠标滚动实现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