Come scorrere un testo in VB.Net

March 21

Come scorrere un testo in VB.Net


Scorrimento testo in un controllo utilizzando Visual Basic.NET non è così complicato come si potrebbe pensare. Al fine di di scorrere il testo, si sta andando ad avere bisogno di eseguire una sezione di codice di un certo numero di volte. Il modo migliore per farlo è quello di utilizzare un controllo "Timer" nella vostra applicazione. È possibile avviare un timer per eseguire il codice fino a quando il timer viene arrestato. Il controllo "Timer" è invisibile per l'utente, ed è comunemente utilizzato per l'elaborazione in background.

istruzione

1 Avviare Microsoft Visual Studio, fare clic su "New Project" dal riquadro sinistro dello schermo del computer, ed espandere "Visual Basic" sotto "Modelli installati." Fai clic su "Windows" e fare doppio clic su "Applicazione Windows Form" dal centro della finestra di dialogo, per creare un nuovo progetto.

2 Fare doppio clic su "Timer" per aggiungere un timer al form. Fare doppio clic su "etichetta" per aggiungere una nuova etichetta al form. Aggiungere un pulsante utilizzando la stessa tecnica. Fare doppio clic su "Button1" per creare un evento click per questo pulsante.

3 Copiare e incollare il seguente codice all'interno del evento click del pulsante:

Per indice di As Integer = 0 Per UBound (textString)

Dim workedString As String = ""

workedString = scrollText.Substring (indice) & "" & scrollText.Substring (0, indice)

textString (indice) = workedString

Il prossimo

Timer1.Interval = 75

Timer1.Enabled = True

Timer1.Start ()

4 Tornare a formare visualizzazione struttura e fare doppio clic su "Timer1" per creare un evento di tick per il timer. Aggiungere il seguente codice all'interno della manifestazione:

xPos + 1 =

Dim tmrStr As String

tmrStr = textString (xPos)

Label1.Text = tmrStr

Se xPos = UBound (textString) Poi xPos = -1

5 Premere il tasto "F5" per eseguire il programma e fare clic su "Button1" per visualizzare il testo a scorrimento utilizzando l'etichetta.