Voici un code pour faire defiler un texte qui me parait plus simple que celui deja proposé
1 creez un timer avec interval a 100
2 un label (label1 pour ce code)
"60" ici correspond a la vitesse
"-2800" a l'extreme gauche de l'ecran MOINS la taille de label de facon a ce que le texte disparaisse de l'ecran
"4500" correspond a l'endroit d'ou debute le scrolling donc a l'extrem droit de l'ecran
Source / Exemple :
Private Sub Timer1_Timer()
Label1.Left = Label1.Left - 60
If Label1.Left <= -2800 Then Label1.Left = 4500
End Sub
Conclusion :
code a mettre dans le sub timer (double click sur l'icone timer)
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.