Défilement du Caption de la Form en VB

Bonjour

Utilise un timer et modifie la propriété caption en la décalant à chaque fois

Je c pas si c'est la même chose en VB6 m en Delphi il faut utiliser un Timer est régler son intervalle sur 200 ou 300 et mètre ces instruction ( et dans le caption de la form il faut metre plein d'espace après avoir écris le titre jusqu'à s que la barre de titre se replisse de blanc ) :
Procedure TForm2.Timer1Timer(Sender: TObject);
var
ch:string;
car:char;
begin
ch:=form1.caption;
car:=form1.caption[length(form1.caption)];
delete(ch,length(ch),1);
ch:=car+ch;
form1.caption:=ch;
end;

end.