Rullande text i en kontroll med hjälp av Visual Basic.NET är inte så komplicerat som du kanske tror . För att du ska rulla text , du kommer att behöva för att utföra en del av koden ett antal gånger . Det bästa sättet att göra detta är genom att använda en " timer " kontroll i din ansökan . Du kan starta en timer för att köra din kod tills timern stoppas . Den " Timer " kontroll är osynlig för användaren , och det är vanligen används för bakgrunden bearbetning . Saker du behöver
Microsoft Visual Studio
Visa fler instruktioner
1
Launch Microsoft Visual Studio , klicka på " Nytt projekt " från den vänstra rutan på din datorskärm , och expandera " Visual Basic " under " Installerade mallar . " Klicka på " Windows " och dubbelklicka på " Windows Forms Application " från mitten av dialogrutan , för att skapa ett nytt projekt .
2
Dubbelklicka på " Timer " för att lägga till en timer till formuläret . Dubbelklicka på " Label " för att lägga till en ny etikett till formuläret . Lägg till en knapp med samma teknik . . Dubbelklicka på " Button1 " för att skapa en click-händelse för denna knapp Addera 3
Kopiera och klistra in följande kod i knappen klickhändelsen :
index As Integer = 0 Till UBound ( textString ) katalog
Dim workedString As String = " "
workedString = scrollText.Substring ( index ) & " " & scrollText.Substring ( 0 , index ) katalog
textString ( index ) = workedString
Nästa
Timer1.Interval = 75
Timer1.Enabled = Sant Timer1.Start
( )
4
Växla tillbaka för att bilda designvyn och dubbelklicka på " Timer1 " för att skapa en fästing händelse för timern . Lägg till följande kod i händelsen :
xpos + = 1
Dim tmrStr As String
tmrStr = textString ( xpos ) katalog
Label1.Text = tmrStr
Om xpos = UBound ( textString ) Sen xpos = -1
5
Tryck " F5 " för att köra programmet , och klicka på " Button1 " att visa rullande text med etikett . Addera
