Codigo de Boton Comenzar
Codigo de Boton Comenzar
Codigo de Boton Comenzar
Timer1.Enabled=true
CODIGO DE BOTON PARAR
Timer1.enabled=false
CODIGO DE BOTON REINICIAR
Timer1.enabled=false
Label1.Caption=0#
CODIGO DE BOTON SALIR
Dim ir As Integer
R=MsqBox(“¿Desea salir realmente del cronometro?” ,
vbQuestion + vbYesNo, “Salir”)
If R= 60 Then
End If
Unload Me
CODIGO DE BOTON SALIR
Label1.Caption=Label1.caption + 01