Showing posts with label Project. Show all posts
Showing posts with label Project. Show all posts

Game project part 5

Private Sub cmdUpB_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) shpHeadB.Top = shpHeadB.Top - 20 shpBodyB...
Read More

Game project part 6

Private Sub Timer1_Timer()  Label1.Caption = i i = i + 1 If i = 30 Then MsgBox ("Time's Up") Me.Hide Form2.Show Form2.lblEnt...
Read More

Game project part 4

Private Sub cmdRightB_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) shpHeadB.Left = shpHeadB.Left + 20 shpB...
Read More

Game project part 3

Private Sub cmdPunchDownA_Click() liHandMoveA.Visible = False liHandStable2A.Visible = True End Sub Private Sub cmdPunchDownB_Click() ...
Read More

Game project part 2

Private Sub cmdLeftA_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) shpHeadA.Left = shpHeadA.Left - 20 shpB...
Read More