Just nu i M3-nätverket
Jump to content

Move metod


Johan Stenström

Recommended Posts

Johan Stenström

Jag skulle vilja veta hur man gör för att få en shape-kontroll eller en bild att röra sig upp och ned i ett VB-formulär. Hur skall jag göra för att få den att gå upp och ned i en jämn och fin fart?

 

 

Hälsningar Johan

 

Link to comment
Share on other sites

Skapa en Timerkontroll som innehåller kod för att öka bildens Y-koordinat samt uppdatera bildkontrollens Y-position.

Timerkontrollen skulle kunna innehålla ungefär detta:

 

Static y
y = y + 1
Picture1.Top = y

 

\\Anp

 

 

Link to comment
Share on other sites

Johan Stenström

Så här gjorde jag och då funkade det till sist. Problemet var att bollen som studsade kom utanför formuläret, och det löste den här koden. Tack för tipset.

 

If img2.Height < (Studs.Height - img2.Top) Then

img2.Move img2.Left + 0, img2.Top + 100

 

Else: tmr1.Enabled = True

tmr2.Enabled = False

 

 

Hälsningar Johan

 

Link to comment
Share on other sites

Archived

This topic is now archived and is closed to further replies.



×
×
  • Create New...