treba mi pomoc u vezi jedne igre koju sam poceo da pravim!
Napravio sam osnovu igre!
'ovo je kretanje
Private Sub form_keydown(keycode As Integer, shift As Integer)
If keycode = vbKeyRight Then slika.Move slika.Left + 200
If keycode = vbKeyLeft Then slika.Move slika.Left - 200
If keycode = vbKeyDown Then slika.Move slika.Left, slika.Top + 200
If keycode = vbKeyUp Then slika.Move slika.Left, slika.Top - 200
End Sub
Private Sub Form_Load()
Form1.BackColor = RGB(0, 0, 0)
igra = InputBox("Upisite vase ime!", "igra")
MsgBox ("Hvala sto korisitite ovu igricu") + igra, vbInformation, "igra"
End Sub
sada kad postavljam neprijatelja npr. slika2
Koji cod trebam ukucati da se slika2 vjecno krece i kad je dotaknem npr. da mi da poruku izgubio si?
MOLIM VAS POMOZITE!!!!!!