Criar um aplicativo Visual Basic.NET que o texto rola auto em um controle TextBox pode ser facilmente realizado utilizando matrizes de corda e um temporizador. Um controle timer em VB.NET irá executar código de forma contínua até que o programa termina. Use uma matriz de String para preenchê-lo com o texto que você deseja rolar e exibir diferentes elementos da matriz na caixa de texto usando o timer para mostrar o efeito de rolagem. Instruções
1

Abra o Microsoft Visual Studio , clique em " New Project" no painel esquerdo da tela do computador e expandir " Visual Basic" abaixo " modelos instalados". Clique em " Windows" e clique duas vezes no centro da janela de diálogo para criar um novo projeto " Windows Forms Application " .
2

duplo clique em " timer " para adicionar um a sua forma . Clique duas vezes em " TextBox " para adicionar uma nova caixa de texto ao seu formulário. Clique duas vezes no formulário para criar um evento de carregamento de forma
3

Adicione o seguinte código acima o evento de carregamento de formulário para criar três variáveis ​​globais, incluindo a que irá realizar o seu texto de rolagem . :

Dim scrollingText As String = " Este é o meu texto de rolagem "

Dim txtStr ( scrollingText.Length - 1) As String Dim

txtPos As Integer = -1 < br >
4

Adicione o seguinte código dentro do evento de carregamento do formulário para percorrer o texto de rolagem e iniciar o temporizador :

Para idx as Integer = 0 To UBound ( txtStr )

Dim workedString As String = ""

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

txtStr ( idx ) = workedString

Em seguida

Timer1.Interval = 75

Timer1.Enabled = True

Timer1.Start ()
5

Volte para formar exibição de design e clique duas vezes " Timer1 " para criar um evento de escala para o temporizador. Adicione o seguinte código dentro do evento :

txtPos + = 1

Dim timerStr As String

timerStr = txtStr ( txtPos )

Label1.Text = timerStr

Se txtPos = UBound ( txtStr ) Então txtPos = -1
6

Pressione " F5" para executar o programa e exibir texto de rolagem usando a caixa de texto.