Ok, i need help with this. I think i got it figured out, but i cant really get it into code. So can u just look over this and see if u can help me out.
Dim Sqaure(69) As Picturebox Dim Whereto As Integer Dim Rockto As Integer Dim charpos As Integer Dim changer As Integer Dim GrassNumber As Integer Charpos = 13 Select Case UCase(Cstr(e.KeyChar)) Case “W” Whereto = charpos + 10 If whereto.image = imlAllpictures.Image.Item(0) than ‘ if image = grass
Also, the line above doesn’t work for some reason, idk why, do u?
GrassNumber = Tag used
Where i need you help.. What i am trying to do is pull out the Tag of whereto and then from the tag get the location of the picturebox with the tag of whereto
Changer = picCharacter.location ‘get location of character picCharacter.location = Whereto.location ‘move character to new location picGrass(GrassNumber) .location = Changer.location ‘Move grass to characters last position
So thats the basic outline of it..
Explain the bold to me PLEASE. THANK U FOR UR TIME...
This post has been edited by Saint_Kyle: 19 July 2010 - 01:27 AM