Soyez le premier à donner votre avis sur cette source.
Snippet vu 3 772 fois - Téléchargée 15 fois
Combo1.Text = "Ceci est un text qui défile"
Dim currentCaption As String Dim lastCaption As String Dim message As String message = "Ceci est un text qui défile" currentCaption = Combo1.Text If Len(currentCaption) <> Len(message) Then currentCaption = Right(currentCaption, Len(currentCaption) - 1) Combo1.Text = currentCaption & Space(10) & message Else Combo1.Text = Combo1.Text & Space(10) & message End If
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.