Skip to content

Instantly share code, notes, and snippets.

@xSystemIOx
Created May 9, 2018 15:12
Show Gist options
  • Select an option

  • Save xSystemIOx/4de47cb96941c800861b00a1e48194b7 to your computer and use it in GitHub Desktop.

Select an option

Save xSystemIOx/4de47cb96941c800861b00a1e48194b7 to your computer and use it in GitHub Desktop.
Character Movement for VB application form
Private Sub MoveShooter()
If Sright = True And Player.Left + Player.Width < Me.ClientRectangle.Width Then
Player.Left += PlayerSpeed
End If
If Sleft = True And Player.Left > Me.ClientRectangle.Left Then
Player.Left -= PlayerSpeed
End If
End Sub
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment