PRA QUE SERVE O DOEVENTS?

JORGESALES 16/06/2015 19:39:59
#447789
pessoal estou na dúvida qual é a real utilidade do [Ô]DoEvents[Ô]
acredito que seja [Ô]faça os eventos[Ô] mas não sei quando devo
usa-lo.
Alguém pode dar um ou mais exemplos de como utiliza-lo?
MARCELOKROL 16/06/2015 21:36:05
#447793
Resposta escolhida
O doevents serve mais ou menos como uma válvula de escape para o windows. Veja este exemplo:
Crie um form e adicione um botão;
no evento click coloque o seguinte codigo
  Dim i As Long
For i = 0 To 9999999
[ô]If i Mod 10 = 0 Then DoEvents
Me.Cls
Me.Print [Ô]I = [Ô] & i
Next i


Agora execute ele e clique no botao adicionado. Agora tente mover a janela aberta. Não vai conseguir ou vai ficar pulando de la pra cá na tela.

Pare a execução do programa e descomente a linha:
[ô]If i Mod 10 = 0 Then DoEvents
tirando o [ô]

agora execute, clique no botão e tente mover a janela.

EPISCOPAL 16/06/2015 22:50:17
#447795
voce usa o DoEvents quando voce vai executar uma operação muito longa ex For next como sitado pelo colega acima.

Quando o processo demora muito aparece aquelas mensagens do windows que o programa não está respondendo ..... qdo vc coloca doevents há uma pausa no seu programa, e se passa a execução para o sistema operacional do windows executar alguma coisa ... que ja estava na fila.

Exemplo do colega acima falou sobre arrastar a janela do seu programa ..... que faz parte do sistema operacional arrastar janelas .... etc
JORGESALES 17/06/2015 02:06:12
#447796
Muito obrigado Marcelo e Wolffire, ajudaram bastante
Tópico encerrado , respostas não são mais permitidas