ON ERROR

USUARIO.EXCLUIDOS 08/01/2005 20:37:19
#59496
Pessoal, gostaria de saber como uso a função on error. E tb se teria como, qdo ele desse um erro ele continuar apartir do erro.
FELIPEA 08/01/2005 20:39:11
#59497 Resposta escolhida
Seguinte, vc pode usar o On Error Resume Next

Com o On Error Resume next vc pode ignorar o erro e continuar
WEBMASTER 08/01/2005 20:41:29
#59499
Ow,
On Error Goto Trata_Erro

Depois, no final :

Exit Sub (Ou Exit Function, se for o caso)

Trata_Erro:
Msgbox "Ocorreu o erro : " & Err.Number & ", Descrição:" & Err.Description

Espero ter ajudado ;)
USUARIO.EXCLUIDOS 08/01/2005 20:43:47
#59500
Então pessoal, vcs tem um exmplo?
USUARIO.EXCLUIDOS 08/01/2005 20:44:39
#59501 Resposta escolhida
Pedro é o seguinte:
Exemplo de on error:

Private sub Button_click()
On error goto Erro
   text1.text= 'xx'
   x=1+1
   y=2+3
   Exit sub
Erro:
   msgbox "Houve um erro..."
end sub


e para continuar após o erro utilize o códiigo que o FelipeA te passou no lugar do On error goto Erro e tira as duas últimas linhas.
USUARIO.EXCLUIDOS 08/01/2005 20:48:51
#59502
Valeu!!! Era isso mesmo q eu queria
Nshiga acho q em todas as perguntas q postei vc me deu uma grande ajuda. Valeu mesmo! Espero contar sempre com sua ajuda.
FelipeA valeu pela força! e tb espero sempre contar com sua ajuda.
WEBMASTER 08/01/2005 20:53:35
#59504
Hahahamamam...e eu ?....rsrs


Zueira kra !!!
Tópico encerrado , respostas não são mais permitidas
Voltar