Programación primaria Vb

Dibuje dos controles de etiqueta idénticos en el formulario: controles de tiempo. La propiedad de intervalo del control del temporizador está configurada en 200, puede usar el siguiente código para obtener el efecto deseado.

Private SubTimer1_Timer()

Si (Label1.Left + Label1.Width & gt= Form1.Width) Entonces

Si Label2. visible=falso

Etiqueta2. izquierda = 0 - etiqueta 2. Ancho

label2.top=label1.top

Terminará si...

Etiqueta 2. Visible = Verdadero

Terminará si...

Si (Etiqueta1. Izquierda & gt= Formulario1. Ancho) entonces

Etiqueta1. izquierda = 0

Etiqueta 2. Visible = False

Terminará si...

Si Label2. visible=Verdadero

Etiqueta2. izquierda = Etiqueta2. Izquierda + 100

Terminará si...

Etiqueta1. izquierda = Etiqueta1. Izquierda + 100