vb.net中picturebox使用的有关问题

vb.net中picturebox使用的问题
我在vb.net添加了picturebox控件，并在控件上通过代码绘制了图形，我想要通过鼠标对该控件进行缩放和平移，这样的操作要如何实现呢？
------解决方案--------------------
可以解决你的问题
------解决方案--------------------
Private Sub MyPic_MouseMove(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs)
        If (bPictureBoxDragging) Then
            Dim oMoveToPoint As Point
            oMoveToPoint = PictureBox_top.PointToClient(sender.PointToScreen(New Point(e.X, e.Y)))
            oMoveToPoint.Offset(oPointClicked.X * -1, oPointClicked.Y * -1)
            sender.Location = oMoveToPoint
        End If
    End Sub
------解决方案--------------------

引用:

Quote: 引用:

可以解决你的问题

按照里面的方法，我改写了我的代码基本可以实现了，但是我还遇到了一个问题想请教。我在picturebox里面用填充多边形的方式进行了填充，填充外围画的是线，但是在放大时我用drawline画的线在放大时会变粗，填充的区域倒是正常的，请问应该怎么处理让那个线不变粗呢，我缩放用的是scaletransform

放大的话基本上会变粗的，你不是有drawline画线嘛。那么在你放大的时候你在重画一下应该是可以的。
可以这样试试，不行在想别的办法。