Visual Basic - Detener Timer

Life is soft - evento anual de software empresarial
 
Vista:

Detener Timer

Publicado por Juan Pablo (46 intervenciones) el 25/08/2006 16:54:45
Hola a todos.

Quisiera saber si existe la manera de detener un timer dentro de su mismo codigo de programacion.
Necesito ejecutar un proceso y cuando haya terminado, automaticamente de tiene que detener, para eso necesito detener el timer.

Gracias de antemano, saludos.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Detener Timer

Publicado por ivan (1039 intervenciones) el 25/08/2006 17:06:33
Timer1.Enabled = True
El código que tengas en el evento "TIMER" empezará a ejecutarse con la frecuencia según la propiedad INTERVAL

Timer1.Enabled = False
El código que tengas en el evento "TIMER" dejará de ejecutarse.

Espero esto te sirva, suerte
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Detener Timer

Publicado por Juan Pablo (46 intervenciones) el 25/08/2006 17:19:31
Gracias por contestar, pero eso ya lo sé.

Lo que quiero es detener mi rutina timer dentro de esta misma, me explico con un ej:

Sub Timer_timer()

' la rutina
' que quiero
' realizar

Timer.Enable=False ' esto no sé si se puede hacer dentro del mismo
' Timer...

End Sub

Quiero sabes si hay una forma de detener la rutina dentro de esta misma.

Saludos.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Detener Timer

Publicado por Jasall (60 intervenciones) el 25/08/2006 17:37:44
Dim Control As Boolean, i As Integer

Private Sub Command1_Click()
Timer1.Enabled = True
Command1.Enabled = False

End Sub

Private Sub Form_Load()
Timer1.Enabled = False
Timer1.Interval = 1000
Command1.Caption = "Empezar"
End Sub

Private Sub Timer1_Timer()

If Control Then
Timer1.Enabled = False
Command1.Enabled = True
Command1.Caption = "Empezar"
i = 0
Else

Command1.Caption = Str(i + 1)
If i + 1 = 10 Then Control = True
i = i + 1
End If

End Sub
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Detener Timer

Publicado por Juan Pablo (46 intervenciones) el 25/08/2006 17:55:00
Muchas gracias Jasall por contestar, voy a probar y ver que ocurre.

Lo unico que me deja dudas es que significa lo ultimo que pusiste, eso del contador, no veo como funciona y que utilidad hace.
Si me lo puedes explicar...

Saludos.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Detener Timer

Publicado por Jasall (60 intervenciones) el 26/08/2006 09:48:34
Contador ?
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar