Deffillement de texte comme dans les credits de jeux

Description

Voici un ptit bout de code vraiment tres simple permettant de faire defiller des images comme du texte a la maniere des CREDITS de jeu vidéo...
J'espere que ce code pourra en aider certains...

DeAtH_-_CrAsH

Source / Exemple :


Private Sub Timer1_Timer()
   If Abs(Picture2.Top) < Picture2.Height Then
      Picture2.Top = Picture2.Top - 60
   ElseIf Abs(Picture2.Top) >= Picture2.Height Then 'permet de refaire partir le texte a partir du bas pour faire plus zoulie :]
      Picture2.Top = Picture1.Height
   End If
End Sub

Conclusion :


Merci par avance pour vos commentaires ...
Bonne prog à tous...

DeAtH_-_CrAsH

Codes Sources

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.