Oprettelse af en Visual Basic.NET program, der automatisk ruller tekst i et tekstfelt kontrol nemt kan gøres ved hjælp String arrays og en timer . En timer kontrol i VB.NET vil udføre kode , indtil programmet slutter . Brug en String array til fylde den med den tekst, du vil rulle , og vise forskellige elementer af array i tekstfeltet ved hjælp af timeren for at vise den rullende effekt. Instruktioner
1

Launch Microsoft Visual Studio , klik på " Nyt projekt " fra venstre rude på din computerskærm og udvide " Visual Basic " under " Installerede skabeloner ". Klik på " Windows" og dobbeltklik på "Windows Forms Application " fra midten af dialogvinduet for at oprette et nyt projekt.
2

Dobbeltklik på " Timer" for at tilføje en til din formular. Dobbeltklik på " TextBox " for at tilføje en ny tekstboks til formularen . Dobbeltklik på formularen for at oprette en formular belastning begivenhed
3

Føj følgende kode over formen load begivenheden til at skabe tre globale variabler, herunder en, der vil holde din rulletekst . :

Dim scrollingText As String = " Dette er min rulletekst "

Dim txtStr ( scrollingText.Length - 1) As String

Dim txtPos As Integer = -1 < br >
4

Føj følgende kode inde i formularen belastning begivenhed til løkken gennem rullende tekst og starte timeren : Hej

IDX As Integer = 0 Til UBound ( txtStr )
< p > Dim workedString As String = " "

workedString = scrollingText.Substring ( IDX ) & " " & scrollingText.Substring (0, IDX )

txtStr ( IDX ) = workedString
< p> Next

Timer1.Interval = 75

Timer1.Enabled = Sand

Timer1.Start ()
5

Skift tilbage til at danne design visning og dobbeltklikke på " Timer1 " for at oprette et kryds begivenhed for timeren. Føj følgende kode inde i begivenheden:

txtPos + = 1

Dim timerStr As String

timerStr = txtStr ( txtPos )

Label1.Text = timerStr

Hvis txtPos = UBound ( txtStr ) Så txtPos = -1
6

Tryk på " F5 " for at køre programmet, og displayet rulletekst hjælp tekstboksen.
< br >