Programación de desplazamiento de texto

El código es el siguiente:

Cree un nuevo documento Txt, copie el código a continuación y guárdelo como. Desde, puedes usarlo.

Versión 5.00

Inicia VB. Formulario Formulario 1

Caption = "Form1 "

Altura del cliente = 6480

Cliente izquierdo = 60

Cliente superior = 450

ClientWidth = 9630

LinkTopic = "Form1 "

Alto de escala = 6480

Ancho de escala = 9630

StartUpPosition = 3 'Valor predeterminado de la ventana

Iniciar VB. VScrollBar VScroll1

Alto = 6495

Izquierda = 9240

Máx. = 100

TabIndex = 1

Arriba = 0

Ancho = 375

Fin

Iniciar VB. Temporizador Temporizador1

Intervalo = 100

Izquierda = 9600

Arriba = 0

Fin

Iniciar VB. Etiqueta Etiqueta1

Título = "A "

Alto = 6375

Izquierda = 0

TabIndex = 0

Arriba = 0

Ancho = 9135

Fin

Atributo VB_Name = "Form1 "

Atributo VB_GlobalNameSpace = False

Atributo VB_Creatable = False

Atributo VB_PredeclaredId = True

Atributo VB_Exposed = False

Subtemporizador privado 1_Timer( )

Etiqueta1. Fuente.Tamaño = Etiqueta1. Font.Size + VScroll1

Conector final