Para los mas experimentados

20/04/2005 - 16:20 por Rodmy Suarez | Informe spam
Un saludo a todos
Bueno soy nuevo en el mundo de visual basic 6.0 (anterior a .NET del cual
tengo alguna experiencia) y no encuentro como le hacen para manejar errores,
es decir en Visual Basic .NET existe el try ...catch ..end try, como hago
esto o algo parecido en visual basic 6.0 (el que viene con visual studio
6.0).

Mil gracias de antemano.

Bendiciones
 

Leer las respuestas

#1 Carlos Durán Urenda
20/04/2005 - 17:52 | Informe spam
en vb6 se utiliza la sentencia On Error
que de hecho tambien puede ser utilizada en .Net


para implementar un manejador de errores tendrias que hacer lo siguiente


inmediatamente despues del la declaracion de la rutina declaras la sentencia
On Error


Sub TuRutina( )
On Error Goto ManejaError
Declaracion de variables
Codigo


en donde ManejaError es una etiqueta, la cual puede tener cualquier nombre
valido (como una variable), de hecho las etiquetas son el equivalente a los
antiguos numeros de linea

despues de tu codigo normal, tendiras que poner una instruccion Exit Sub,
que te saque antes de entrar al controlador de errores, esta instruccion
estaria seguida por la etiqueta y el control de errores algo mas o menos
asi...


Sub TuRutina( )
On Error Goto ManejaError
Declaracion de variables
Codigo

Codigo
' al terminar el codigo, comienza el manejador de errores, precedido de
Exit Sub, esto para que
' no entre a dicho manejador si no ocurre un error

Exit Sub ' Aqui termina la rutina si no hay errores

ManejaError:
' ManejaError es la etiqueta a donde el codigo brinca inmediatamente
despues de un error
' esta etiqueta va seguida de dos puntos (:)

Select Case Err.Number
'el objeto Err se llena inmediatamente despues de un error y se
puede utilizar el numero
' para identificar el tipo de error

case 2235 ' algun error
' codigo necesario para tratar el error
' si el error pudo ser corregido puedes utilizar Resume
para ejecutar nuevamente
' la linea que ocacionó el error
' o puedes usar Resume Next para ejecutar descartar la
linea del error y continuar
' a partir de la siguiente linea
case ...
...
case Else
Msgbox "Error Desconocido " & vbCrlf & " Numero: " &
Err.Number & vbcrlf & _
Err.Description, vbCritical
End Select


Espero te sea de utilidad

Saludos
Carlos Durán




"Rodmy Suarez" escribió en el mensaje
news:OC$
Un saludo a todos
Bueno soy nuevo en el mundo de visual basic 6.0 (anterior a .NET del cual
tengo alguna experiencia) y no encuentro como le hacen para manejar
errores,
es decir en Visual Basic .NET existe el try ...catch ..end try, como hago
esto o algo parecido en visual basic 6.0 (el que viene con visual studio
6.0).

Mil gracias de antemano.

Bendiciones


Preguntas similares