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