PoLaKo
20 de Diciembre del 2003

Como ya saben estoy tratando de hacer un juego pero entre que me cuesta y visual no me ayuda se me hace medio complicado.igual cada ves falta menos,ya casi lo termino
tengo problemas con esto

If Image1.Top - 26 = Image2.Top And Image2.Left = Image1.Left Then
MsgBox "ACABAS DE PERDER "
End If

no me reconocen los "="
ayuda por favor

Baltasar
20 de Diciembre del 2003

El problema no está en los "=", sino en los "AND". Lo que has de hacer es:
If (Image1.Top - 26 = Image2.Top) And (Image2.Left = Image1.Left) Then MsgBox "ACABAS DE PERDER "
End If

al no poner los paréntesis, la aplicación hace un AND entre image2.top y image2.left, y entonces lo compara con (image1.top-26).

Saludos

Gino
20 de Diciembre del 2003

por lo q parece tratas de crear o detectar una colision, podrias usar la api collide, pero en todo caso prueba con "<" y/o ">" en lugar del = , espero haberto ayudado.

PoLaKo
20 de Diciembre del 2003

Si ya pribe con el < o > pero no me sirbe. me podrias mandar un ejemplo de esa api?