Ciao "FORUM",

VS2008 - Visual Basic - Testo scorrevole



Vorrei poter far scorrere in una "Label" del testo.
Nel FORUM ho trovato il codice per VB6 che riporto:

********************************
Dim sTesto As String, btStart As Byte
Private Sub Form_Load()
sTesto = "Prova testo scorrevole in una Lbl"
btStart = 1
End Sub
Private Sub Timer1_Timer()
Label1.Caption = Right(sTesto, Len(sTesto) - btStart) + Left(sTesto, btStart)
btStart = btStart + 1
If btStart > Len(sTesto) Then btStart = 1
End Sub
*********************************

In VB6 , dopo aver inserito il controllo "Timer", il codice funziona, il testo scorre .
Ho fatto la stessa cosa in VS2008 , anche qui il codice funziona, non segnala alcun errore, ma il testo non scorre.
Qualcuno sa come posso risolvere?

In attesa, grazie.