AJUDA PRA FAZER UM CRONOMETRO

USUARIO.EXCLUIDOS 04/12/2006 23:59:26
#187992
Alguém dá um help pra fazer um cronometro em vb.net?

Pra fazer um relógio eu sei:

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        mostra_relogio.Text = Now.Hour & ":" & Now.Minute & ":" & Now.Second
End Sub


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

        mostra_relogio.Text = Now.Hour & ":" & Now.Minute & ":" & Now.Second
 End Sub


Mas o cronometro eu não consegui fazer...ele começar, parar e zerar o cronometro...
Se alguém tiver uma dica...
Valeu!
RAMSES 05/12/2006 10:57:55
#188039
tu coloco un timer no teu formulario ?
coloca como enable = true
e para formatear a saida pode usar
mostra_relogio.Text = Now.ToString("HH:mm:ss")
USUARIO.EXCLUIDOS 05/12/2006 12:14:24
#188053
Meu Visual studio é 2003, não consegui abrir o arquivo(chaapolinn).
Quando eu faço o load o cronometro está zerado:
lblcronometro.Text = Now.MinValue
Pra iniciar o cronometro eu usei este código:
 Private Sub btniniciar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btniniciar.Click
        Timer2.Start()
End Sub

Ele inicia, MAS inicia mostrando a HORA ATUAL pois no tick está:
Now.ToString("HH:mm:ss")
Como faz pra ele começar do 00:00:00? "00:00:01 | 00:00:02" ............

Estou enviando o arquivo pra darem uma olhada, tem um timer1, q é o relógio, o cronometro é o timer2...
Flw
USUARIO.EXCLUIDOS 05/12/2006 15:00:15
#188103
Deu a mesma coisa, usando timer1.enable=true ou timer.start() e o false ao invés do stop. e o
TX.TEXT=FORMAT(NOW,"hh.mm.ss") é a mesma coisa q: TX.Text = Now.ToString("HH:mm:ss").
O problema é o now q pega a hora(do relógio do pc). Daí tu inicia o cronometro com a hora do relógio e não com 00:00:00....esse é o problema....
USUARIO.EXCLUIDOS 05/12/2006 15:24:59
#188112
Mas como é cronometro teria q ter aqueles números mais rápidos q os segundos...como ficaria a formatação daí? ("hh:mm:ss:??")
USUARIO.EXCLUIDOS 05/12/2006 17:35:14
#188160 Resposta escolhida
gente.. pq vcs não simplesmente mandam somar 1 na casa dos segundo?? não sei mecher ainda com .net mas o codigo funcionaria assim:

Private Sub Timer oi ()
txttempo.text=txttempo + 1
end Sub


no 1º botão vc coloca:
Timer.enabled=true
e ele starta

no 2º
Timer.enable=false
e ele para

no 3º vc coloca
Timer.enable=false
txttempo.text=0

assim ele vai contar em segundos... se quiser fazer no formato de horas, minutos e segundos... dai vc tem q fazer ifs e colocar:

If segundos = 60
If minutos = 60
horas= horas +1
End If
minutos = minutos + 1
elseif segundos < 60 then
segundos = segundos + 1
End If

dai da pra fazer em 3 textboxs.. ou então concatenar as variaveis depois...
USUARIO.EXCLUIDOS 05/12/2006 17:39:45
#188162
só agora li dos centésimos.. então.. se você quiser os centésimos e milésimos.. você faz mais um if até 99...

ah... e ali onde tá 60 é 59.. nos dois... senão ele vai contar 1 minuto como 61 segundos.. o mesmo com a hora...

e tem que colocar depois la =0 pq senão ele vai continuar contando.. ou seja:

Private Sub Timer ()
If segundos = 59 
  If minutos = 59 
     horas= horas +1
     minutos = 0 
  End If 
  minutos = minutos + 1
  segundos = 0
ElseIf segundos < 59 then 
segundos = segundos + 1 
End If 

sacaram?? não sei pq complicar com aqueles outros codigos.. hehehe
USUARIO.EXCLUIDOS 05/12/2006 18:02:22
#188176
só agora li dos centésimos.. então.. se você quiser os centésimos e milésimos.. você faz mais um if até 99...

ah... e ali onde tá 60 é 59.. nos dois... senão ele vai contar 1 minuto como 61 segundos.. o mesmo com a hora...

e tem que colocar depois la =0 pq senão ele vai continuar contando.. ou seja:

Private Sub Timer ()
If segundos = 59 
  If minutos = 59 
     horas= horas +1
     minutos = 0 
  End If 
  minutos = minutos + 1
  segundos = 0
ElseIf segundos < 59 then 
segundos = segundos + 1 
End If 

sacaram?? não sei pq complicar com aqueles outros codigos.. hehehe
Página 1 de 2 [12 registro(s)]
Tópico encerrado , respostas não são mais permitidas
Voltar