I assume you are asking how to scroll text in a label(?).
You can use a timer with a pointer to the starting position of the text in the label.
Example:
txt = "This is text to scroll in a Label. "
txtStart = 0
Sub Timer1_Tick
If txtStart < txt.Length then
txtStart = txtStart + 1
Else
txtStart = 0
end if
Label1.Text = txt.SubString(txtStart) & txt
End Sub
The above code is not ready to run; it's just to get the idea across. You need to set up the variables and the timer, etc.