Gå til innhold

Anbefalte innlegg

Skrevet

Hallo.

Holder på med et 'labyrint' spell... Der det gjeder å komme seg fram til mål.

Har sån at vist du treffer veggane så taper du.

Men eg får an ikke til å 'vinne' når den treffer 'mål'

 

Spille ligger i vedlegge

labyrint.rar

Videoannonse
Annonse
Skrevet (endret)

Du sjekker om Shape1 overlapper Label1 på samme måte som med PictureBoxene rundt omkring i labyrinten.

 

Legg til dette nederst i 'SjekkGameOver':

If Collide(Label1.Left, Label1.Top, Shape1.Left, Shape1.Top, Label1.Width, Label1.Height, Shape1.Width, Shape1.Height) Then
   
   MsgBox "DU VANT!!!!!", vbInformation
   End
       
End If

Endret av Jonas

Opprett en konto eller logg inn for å kommentere

Du må være et medlem for å kunne skrive en kommentar

Opprett konto

Det er enkelt å melde seg inn for å starte en ny konto!

Start en konto

Logg inn

Har du allerede en konto? Logg inn her.

Logg inn nå
×
×
  • Opprett ny...