Programar un Relog

Iniciado por andresxdddd, 16 Enero 2011, 22:37 PM

0 Miembros y 2 Visitantes están viendo este tema.

andresxdddd

buenas :D 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 :D

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  ;D

andresxdddd

Cita de: ignorantev1.1 en 16 Enero 2011, 23:38 PM
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  ;D

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

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

Cita de: Mr. Frog © en 17 Enero 2011, 00:07 AM
@andresxdddd
Eso es vb.Net, tu sección es esta:
http://foro.elhacker.net/net-b62.0/

DoEvents! :P
: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

#7
Cita de: ignorantev1.1 en 17 Enero 2011, 01:17 AM
Ok, vamos a ello, te sugiero pongas sobre la mesa lo que tienes... digo... si quieres  ;)
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?
Cita de: Dunkancito2236 en 17 Enero 2011, 01:18 AM
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]
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

Cita de: ignorantev1.1 en 17 Enero 2011, 02:05 AM
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]
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