|
|
Postada em 12/03/2006 10:34 hs
pessoal, por que o interval do Timer1 não passar de 10.000, e como eu sei quanto tempo é isso.. ex: 1000 quantos segundos é? estou precisando de 20 minutos para a ação. |
|
|
|
|
|
|
|
Postada em 12/03/2006 12:34 hs
1000 DE INTERVAL EQUIVALE A 1 SEGUNDO,O MÁXIMO QUE O TIMER CHEGA É 65535(EQUIVALE A 1 MINUTO 5 SEGUNDOS E 535 MILLISEGUNDOS).POR ISSO PARA ESPERAR 20 MINUTOS PARA UMA AÇÃO USE O TEMPO EM QUE O WINDOWS ESTÁ RODANDO E VAI TIRANDO A DIFERENÇA COM UM TIMER DE 60000 DE INTERVAL(1 MINUTO). Private Declare Function GetTickCount& Lib "kernel32" ()
Dim tinicial, tatual, tfinal
Private Sub Form_Load()
Timer1.Interval = 60000
tinicial = CInt(GetTickCount& / 60000)
End Sub
Private Sub Timer1_Timer()
tatual = CInt(GetTickCount& / 60000)
tfinal = CInt(tatual - tinicial)
If tfinal = 20 Then MsgBox "TEMPO ESGOTADO"
End Sub |
|
|
|
|
|
Postada em 12/03/2006 17:56 hs
Voce pode também definir a propriedade Interval do Timer como 60.000 (equivale a um minuto) Depois nomeia uma variável Dim lTEMPO as Long lTEMPO = 0 Private Sub Timer1_Timer() lTEMPO = lTEMPO + 1 If lTEMPO = 20 Then lTEMPO = 0 ' Zera a variável para nova contagem 'escreva aqui a ação ou chame o procedimento End If End Sub vlu// |
|
|
|
|
|
Postada em 12/03/2006 22:00 hs
gosto mais da soluçao do LCRamos... é bem funcional e nao meche com API, que pode gerar confusao pra quem ta começando...
Elieser Carlos Topassi
Analista de Sistemas - Desenvolvedor VB/ASP/.Net
e-mail/msn: elieser_topassi@yahoo.com.br
São José do Rio Preto,SP - Brasil
_____________________________________________________
 "O caminho do tolo aos seus prórios olhos lhe parece reto, mas o sábio ouve conselhos" (Pv 12:15)
|
|
|
|
|
|
Postada em 13/03/2006 08:03 hs
Sei la.....os dois são bons....mais vai depender do programa que vc esta desenvolvendo....eu por exemplo tenho um programa para capturar foto do usuário...a cada "X" minutos.....o usuario pode escolher entre 1 até infinito........ Mas para conseguir isso vc tem que quebrar a kbeça....tem que usar varias ferramentas e da muito trabalho acho q ñ severia pra vc.....mas acho q o mais simples é o do LCRamos
Obs. Hotmail uso apenas para messenger!! Aprendiz e Futuro programador!!! "Todo seu conhecimento deve ser compatilhado!!!" --- ---
|
|
|
|
|
|
Postada em 13/03/2006 11:44 hs
APOIADO,NÃO HAVIA PENSADO NA IDÉIA DO LCRAMOS. |
|
|
|
