Control Timer (Intervalos de Tiempo - Programación en Visual Basic. Net con Visual Studio 2013 (9-25)

Curso completo de Visual Basic.Net desde cero, bienvenidos les sugiero a todos los que se inician a programar aplicaciones Windows Forms que sigan este Tutorial completo, en esta entrada se detalla el uso del control timer para trabajar con intervalos de tiempo en el lenguaje de programación Visual Basic. Net, crearemos una pequeña animación con dos label y mostraremos la hora actualizada del sistema.

Pueden consultar toda la documentación respectiva (Diapositivas, textos, vídeos, códigos fuentes, librerías, etc.) de este conjunto de posts.

Pueden ver los vídeos directamente en youtube:

https://www.youtube.com/watch?v=33uPg7kEPic&list=PLZPrWDz1MoloGD4irFB-YMIKvUYNu1i3m&index=1

Visita nuestro canal en youtube donde encontrarás cursos completos de Desarrollo de software y aprende a diseñar sistemas informáticos totalmente gratis:
www.youtube.com/jcarlosad7

Control Timer (Intervalos de Tiempo) 

Componente que genera un evento a intervalos de tiempo definidos por el usuario.

Problema 7

Implementar una aplicación en Visual Basic que permita mostrar la hora actualizada al Segundo, y que permita crear una animación simple entre dos etiquetas de texto.

Formulario

Botón Play

timer2.Enabled = true;

Botón Stop

timer2.Enabled = false;

Evento Tick del Timer y Load

Private num As Integer = 0

    Private Sub Timer2_Tick(sender As Object, e As EventArgs) Handles Timer2.Tick

        If (num Mod 2 = 0) Then

            Label1.Visible = 1

            Label2.Visible = 0

        Else

            Label1.Visible = 0

            Label2.Visible = 1

        End If

        num = num + 1

    End Sub

Private Sub frmtimer_Load(sender As Object, e As EventArgs) Handles MyBase.Load

        Label3.Text = TimeOfDay

    End Sub

    Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick

        Label3.Text = TimeOfDay

    End Sub

Control timer (9-25) Programación Visual Basic. Net con Visual Studio 2013

Saludos Imperio un abrazo a la distancia!!!