Dim g As Graphics = DirectCast(sender, PictureBox).CreateGraphics()
Dim g As Graphics = sender.CreateGraphics()