ON ERROR GOTO LINEAERROR
Publicado por Basico (322 intervenciones) el 23/03/2005 10:49:33
Tengo el siguiente codigo:
Private Sub Procedimiento()
Dim NU as Integer
On Error Goto LineaError
NU = \"A\"
Exit Sub
LineaError:
MsgBox Err.Description
End Sub
Se supone que tendria que funcionar y no parar la aplicacion mostrandome que ha habido un error en tiempo de ejecucion diciendo que no coinciden los tipos. ¿No? Si es asi, ¿por que pasa eso?
Gracias.
Private Sub Procedimiento()
Dim NU as Integer
On Error Goto LineaError
NU = \"A\"
Exit Sub
LineaError:
MsgBox Err.Description
End Sub
Se supone que tendria que funcionar y no parar la aplicacion mostrandome que ha habido un error en tiempo de ejecucion diciendo que no coinciden los tipos. ¿No? Si es asi, ¿por que pasa eso?
Gracias.
Valora esta pregunta


0