Programar un Relog

[andresxdddd]

buenas me gustaria realizar un relog grande ( muy muy grande) del tamaño de mi  monitor pero no solo eso. si no que tenga un menu , es decir, el form1 contenga unos cuentos bottones y cada botton lleve a un relog diferente. no se si me explico el relog es para juegos deportivos futbol y bastket entonces el usuario puede elegir entre que tiempo quiere selecionando futbol o bastket supongamos que futbol sea tiempos de 20 min y 20 min. entonces mi idea es que se pare cuando llegue a 00:20:00 y que suene una especie de alarma. es siemple pero algo confuso. mis preguntas

¿ como programo el relog?
¿ como podria reiniciar el relog?
¿ como agregar o modificar el tiempo del relog? " en el caso de futbol y basket porque no dardan el mismo tiempo.

gracias

[ignorantev1.1]

Asi no funcionan las cosas aqui 

Te recomiendo que leas algo y empiezes a crear tu codigo(a como puedas), en base a eso las personas que saben en este foro te ayudaran, pero nadie querra ayudarte a empezar desde cero...

Quizas un Timer te ayudaria... Echale ganas 

[andresxdddd]

Asi no funcionan las cosas aqui 

Te recomiendo que leas algo y empiezes a crear tu codigo(a como puedas), en base a eso las personas que saben en este foro te ayudaran, pero nadie querra ayudarte a empezar desde cero...

Quizas un Timer te ayudaria... Echale ganas 

en realidad se hacer casi todo me falta lo del relog he leido sobre colocar algo asi

Código (c) [Seleccionar] Expandir


Private Sub Timer1_Tick(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles Timer1.Tick
Label1.Text = Date.Now.ToLongTimeString
End Sub

[Psyke1]

@andresxdddd
Eso es vb.Net, tu sección es esta:
http://foro.elhacker.net/net-b62.0/

DoEvents!

[andresxdddd]

@andresxdddd
Eso es vb.Net, tu sección es esta:
http://foro.elhacker.net/net-b62.0/

DoEvents!

:O pero esta sección es visual basic no? mi proyecto lo quiero hacer en VB :s

[ignorantev1.1]

Ok, vamos a ello, te sugiero pongas sobre la mesa lo que tienes... digo... si quieres 

[Dunkancito2236]

Sí mira, te explico, necesitas www.google.com y un diccionario

ReloJ

[andresxdddd]

Ok, vamos a ello, te sugiero pongas sobre la mesa lo que tienes... digo... si quieres  

Código (c) [Seleccionar] Expandir

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
       Label1.Text = Date.Now.ToString("hh:mm:ss")
Es lo que tengo en timer, y la verdad todo funciona bien, el problema es que el relog no empieza de 00:00:00 si no desde la hora que es actualmente. yo creo que es por que le puse  Date.Now. pero no se como colocarlo desde cero. alguna idea?

Sí mira, te explico, necesitas www.google.com y un diccionario

ReloJ

amigo no das ninguna idea si intentas ser ofencivo simplemente pierdes el tiempo

[ignorantev1.1]

mmmm eso es VB?
Parece VB NET...

Bueno, como sea, quieres hacer un cronometro o un simple reloj?

Bueno, esto es un cronometro en VB,  no VBNET...

Código (vb) [Seleccionar] Expandir

Dim segundos As Integer
Dim minutos As Integer
Dim tipo As String

Private Sub cmdReiniciar_Click() 'reiniciar
    segundos = 0
    minutos = 0
End Sub

Private Sub cmdFutbol_Click()
    tipo = "futbol"
    Call cmdReiniciar_Click
End Sub

Private Sub Form_Load()
    Timer1.Interval = 1000
    tipo = "futbol"
End Sub

Private Sub Timer1_Timer()
    Dim strMin As String
    Dim strSeg As String
    If Len(minutos) <= 9 Then strMin = "0" & minutos Else strMin = minutos
    If Len(segundos) <= 9 Then strSeg = "0" & segundos Else strSeg = segundos
   
    Label1 = tipo & " " & strMin & ":" & strSeg
    segundos = segundos + 1
    If segundos = 59 Then minutos = minutos + 1: segundos = 0
    Select Case tipo
    Case "futbol"
        If minutos = 45 Then Timer1.Enabled = False
    End Select
End Sub



[andresxdddd]

mmmm eso es VB?
Parece VB NET...

Bueno, como sea, quieres hacer un cronometro o un simple reloj?

Bueno, esto es un cronometro en VB,  no VBNET...

Código (vb) [Seleccionar] Expandir

Dim segundos As Integer
Dim minutos As Integer
Dim tipo As String

Private Sub cmdReiniciar_Click() 'reiniciar
    segundos = 0
    minutos = 0
End Sub

Private Sub cmdFutbol_Click()
    tipo = "futbol"
    Call cmdReiniciar_Click
End Sub

Private Sub Form_Load()
    Timer1.Interval = 1000
    tipo = "futbol"
End Sub

Private Sub Timer1_Timer()
    Dim strMin As String
    Dim strSeg As String
    If Len(minutos) <= 9 Then strMin = "0" & minutos Else strMin = minutos
    If Len(segundos) <= 9 Then strSeg = "0" & segundos Else strSeg = segundos
   
    Label1 = tipo & " " & strMin & ":" & strSeg
    segundos = segundos + 1
    If segundos = 59 Then minutos = minutos + 1: segundos = 0
    Select Case tipo
    Case "futbol"
        If minutos = 45 Then Timer1.Enabled = False
    End Select
End Sub



Disculpame por estupido inconcientemente confundi lo que queria hacer es un cronomentro lo que queria hacer disculpa no un relog. dejame revisar tu codigo y te cuento muchas gracias