Visual Basic 6.0, Simple collision

[rauliweb]

can you show the whole code  for

private Sub Form_KeyDown(KeyCode as Integer, Shift as Integer)

i need to move the sape thanks

[TehAnimatorKing]

mine wont work for some reason, tried twice now

well works for left and top

[TehAnimatorKing]

mine wont work for some reason, tried twice now

[projapple12]

it didn't work for the timer being 1000, but it did for 1 meaning it needs to be constantly checking, right?

[Jeffreyshnigity]

For Some Reason It Stops The Shape For Left And Right, But Not For Up And Down... So, Idk, But I Might Of Missed Somthing Because Of That Anotiation Through Whole Vidio >_<

[deluksic]

hey u dont have to change timer just in code instead of equal write > or < and that would do! i m begginer with vb but u should realy know that!

[lilwarthog]

Tip for people. If you want something to happen when you go into some like you want to run into a label or something and you want it to go to a new place. Put this code in a timer

If Image1.Top = Shape1.Top Then 'Image1 is my person Shape1 is the thing i run into

MsgBox "Worked" 'This is what will happen.

Image1.Top = Image1.Top - 90 'this will move the character back so a lag loop wont happen

End If 'ends the if

[lilwarthog]

Music = :)

[montrealerbacon]

Option Explicit FTW

[rjc0l3]

can you make this for download?

[Mihawkler]

i would do that:

If Shape1.Top >= Shape2.Top then

Shape1.Top = Shape2.Top

End If

same thing with the other 3 sides.

With my solution the ball wouldnt shake around if it collides.

Just a comment for other people, you made this one almost 2 years ago, i think u got better ;D

[maxinimrod]

I can't make it work! why could it be?

[Mattformer]

Can you please make a chat spammer, a good one PPLLEEAASSEE?????

[dudeofgods]

where is shape 2

[VisualBasicWizard09]

Lol, shape two is the border, oops sorry wrong account.

[AcrazedFFfan]

sorri but this is some poor collision detection algorithm(if u could call it that), personally bruv you wouldnt implement collision like this in an RPG, tile based , or bounding rectangles (depending on your game)

[leirbag4592]

why does the 10 to 1000 interval affects?

[SSHPCS2]

do you know how if my object goes over something it will enter a new form

[sxmaxchine]

in vb2008 you write

if collision (objectname,otherobjectname) then

me.hide

form2.show

[buckfush98]

Never mind i fixed it lol

[buckfush98]

im having a problem...Heres the code i copied off of you for the "wall" And im getting Runtime error "424" and it highlights the code

"If Shape1.Top = Shape2.Top Then"

[Fevaklas20]

hey good tutorial!

what's the song in the background?

[N46RECONXX]

Thanks! the song is "Carry on my wayward son" by Kansas.:)