Home Hardware Networking Programmazione Software Domanda Sistemi
Conoscenza Informatica >> Programmazione >> Nozioni di base di Visual Programming >> .

Come scorrere un testo in VB.Net

Scorrimento del testo in un controllo utilizzando Visual Basic.NET non è così complicato come si potrebbe pensare . In modo per voi 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 è fermo . Il controllo "Timer" è invisibile per l'utente , ed è comunemente utilizzato per l'elaborazione in background . Cose che ti serviranno
Microsoft Visual Studio
Mostra più istruzioni
1

lancio di Microsoft Visual Studio , fare clic su " Nuovo Progetto" dal riquadro sinistro dello schermo del computer , e espandere " Visual Basic " " Modelli installati . " qui sotto Fare clic su "Windows" e fare doppio clic su " Applicazione Windows Form " dal centro della finestra di dialogo , per creare un nuovo progetto .
2

doppio click su " Timer " per aggiungere un timer per il vostro modulo . Fare doppio clic su " Label " per aggiungere una nuova etichetta per il vostro modulo . Aggiungere un pulsante con la stessa tecnica . . Doppio clic su " Button1 " per creare un evento click di questo bottone
3

Copia e incolla il seguente codice all'interno del pulsante click :

index As Integer = 0 To UBound ( textString ) per

Dim workedString As String = " "

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

textString (indice ) = workedString

Avanti

Timer1.Interval = 75

Timer1.Enabled = True

Timer1.Start ( )

4

Passare di nuovo alla forma vista del design e fare doppio clic su " Timer1 " per creare un evento di zecca per il timer . Aggiungere il seguente codice all'interno dell'evento :

xPos + = 1

Dim tmrStr As String

tmrStr = textString ( xPos ) per

Label1.Text = tmrStr

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

Premere " F5 " per eseguire il programma e fare clic su " Button1 " per visualizzare il testo scorrevole con l'etichetta .

 

Programmazione © www.354353.com