aumentar el tiempo del timer

[bautistasbr]

 ola amigos

como puedo poner en el intervalo del timer 40 minutos??


Gracias

[Hans el Topo]

ola amigos

como puedo poner en el intervalo del timer 40 minutos??


Gracias

el interval del timer viene en milisegundois 1sg=1000msg xd

40*60*1000=2400000 milisegundos xd

[bautistasbr]

me dice q el valor no es valido

[Hans el Topo]

me dice q el valor no es valido

pos me da que no se puede.... xd


1 a 65.535  Establece un intervalo (en milisegundos) que se hace efectivo cuando se establece True en la propiedad Enabled de un control Timer. Por ejemplo, un valor 10.000 equivale a 10 segundos. El máximo, 65.535 milisegundos, equivale a poco más de un minuto.

[Meg]

Facil en el Form_load pon esto

timer1.interval = 60000 ' el intervalo sera un minuto k es el maximo permitido

y en el codigo del timer pon esto:

Dim contador as string
If contador = "40" Then
TU CODIGO
contador = 0
End If

Else
contador = Contador + 1
End If

Cada minuto se pone un contador,cuando hay 40 contadores han pasado 40 minutos y se ejecutara lo k kieras hacer

[Meg]

Perdon me e ekivocado en el codigo del timer seria asi:

If contador = "40" Then
TU CODIGO
contador = 0
Else
contador = Contador + 1
End If

[NYlOn]

Es que la variable Contador la tenes que declarar como Integer. O byte...

[Hans el Topo]

Perdon me e ekivocado en el codigo del timer seria asi:

If contador = "40" Then
TU CODIGO
contador = 0
Else
contador = Contador + 1
End If

la variable deberia de ser global y entera(integer)... xk sino en cada entrada se vuelve a dimensionar... xd
y si quieres ahorrarte el contador lo metes en el tag del timer...
timer()
  contador=contador+1
  if contador=40 then
     'orgia
     contador=0
  endif
end sub

[Meg]

Es que la variable Contador la tenes que declarar como Integer

Exacto como global e integer,eso me pasa por escribir rapido,se me paso lo siento xD