สอบถามเรื่องย้าย location PictureBox BackColor Transparent ครับ

Private Sub Move_MouseClick(sender As Object, e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseClick

For i = Pb1.Location.X + Pb1.Width To x
                Thread.Sleep(5)
                Pb1.Location = New Point(Pb1.Location.X + 1, Pb1.Location.Y)
Next

End sub