Ir para o conteúdo
  • Revista PROGRAMAR: Já está disponível a edição #60 da revista programar. Faz já o download aqui!

dlemos

Dúvida - tratamento de erros

Mensagens Recomendadas

dlemos

Boas

Tenho a seguinte dúvida:

id1 = InputBox("Especifique a Identificação da central", "CALCULADORv1.0")

On Error GoTo ERROR_HANDLING

ERROR_HANDLING:

    MsgBox "ISTO É UM ERRO"

Porque é que o programa, ao executar a função continua a mostrar a mensagem de erro?

id1 é uma variável inteira do tipo long

Obrigado

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites
programadorvb6

mostra lá + código.

Assim não se consegue ver nada.

Só para terminar.

Todo o form deverá ter no inicio.

Option explicit

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites
YoungCoder
Private Sub Acalculadora()
     On Error GoTo ErrorHandler ' esta expressão tem que ser antes de o possível erro acontecer!
     ' Insere aqui o codigo
     id1 = InputBox("Especifique a Identificação da central", "CALCULADORv1.0")
   Exit Sub     ' Exit para evitar o handler.

ErrorHandler:  ' Rotina de tratamento de erros
     Select Case Err.Number   '  Avaliar o error number.
          Case 6   '  erro divisão por zero
               MsgBox("Tentou dividir por zero!")
          Case Else
               ' Insere aqui o codigo para tratar o erro
     End Select
     Resume Next  ' Resume a execução na mesma linha que causou o erro
End Sub


IIF(strQuestion = "Stupid",doSEARCH!,doHELP!)

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites
dlemos

Ah a expressão tem que ser antes do erro OK. Assim já dá

Estou a dar os primeiros passos nisto da VBA...obrigado aos 2 pelas respostas, abraço!

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!

Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.

Entrar Agora

×

Aviso Sobre Cookies

Ao usar este site você aceita os nossos Termos de Uso e Política de Privacidade. Este site usa cookies para disponibilizar funcionalidades personalizadas. Para mais informações visite esta página.