Hi@all!
Wird auf einen Auslöser geklickt, so soll ein Bild von links nach rechts durch das Bild fliegen.
Das Problem dabei ist, dass das Bild von einem Moment auf den anderen an der Position ankommt. Hier der Code:
Private Sub Image_Click()
Do While (Trabant.Left <= 700)
Trabant.Left = Trabant.Left + 1
Loop
End Sub
Ich habe es auch mit Delay ausprobiert, aber das hat auch nicht den gewünschten Effekt gebracht.
Konkret geht es darum, einen kleinen Trabi durch das Bild fahren zu lassen!
|