Monday, November 4, 2013

Set the starting position of picCar1 or other object using the location command

Private Sub btnNEW_Click(sender As Object, e As EventArgs) Handles btnNEW.Click
picCar1.Location = New Point(picCar1.Location.X.Equals(0), picCar1.Location.Y.Equals(0))
picCar1.Top = picCar1.Top + 50
picCar1.Left = picCar1.Left + 60
 
btnNEW.Enabled = False
btnNEW.Visible = False

picCar1.Image = My.Resources.car1_Right
 End Sub

No comments:

Post a Comment