A Image control has a picture of a round ball. The control sits under two lines. One line is horizontal and the other line is vertical and they intersect the ball through the center of the ball. I want to make the ball bigger by a factor of 1 on each click of the button and keep the ball centered with the two lines but it gets off centered as the ball gets bigger.
Code:
Private Sub Command1_Click()
picBall.Move picBall.Left - 1, picBall.Top - 1, picBall.Width + 1, picBall.Height + 1
End Sub