Blog de Daiyiro

#BlogDeDaiyiro es sobre todo Bricolajes de Electrónica/Informática. ¡^-^¡

LO NUEVO:

14.10.13

Crear un reloj En Vb.Net Que Marque HH.MM.SS y Día

A continuación, os enseño una pequeña aplicación de un reloj que hice, consiste en un formulario con un Timer, para crear un reloj que marque "hora, minutos, segundos y día".



CÓDIGO DEL FORM1 SERIA SIMILAR A ESTO:


Imports VB = Microsoft.VisualBasic

Public Class Form1


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

        Dim wkday As Object
        wkday = Weekday(Now)


        Label1.Text = TimeOfDay


        Select Case wkday = Weekday(Now)

            Case wkday = 1

                wkday = "Domingo"

            Case wkday = 2

                wkday = "Lunes"

            Case wkday = 3

                wkday = "Martes"

            Case wkday = 4

                wkday = "Miércoles"

            Case wkday = 5

                wkday = "Jueves"

            Case wkday = 6

                wkday = "Viernes"

            Case wkday = 7

                wkday = "Sábado"
        End Select


        Label2.Text = wkday & " " & VB.Day(Now)


    End Sub


End Class


la vista del formulario a mi se me quedo así:



Una imagen de la aplicación ejecutándose:



Espero que os sea de utilidad...

Descargar Reloj.rar

Un Saludiioo.

2 comentarios:

  1. Descargado el codigo, funciona perfectamente, gracias por compartirlo.

    ResponderEliminar
  2. Hola, como coloco la hora en el encabezado del formulario? Saludos

    ResponderEliminar