Ver Mensaje Individual
  #3 (permalink)  
Antiguo 25/10/2004, 11:21
Avatar de lucasiramos
lucasiramos
 
Fecha de Ingreso: agosto-2004
Ubicación: Santa Rosa, La Pampa, Argentina
Mensajes: 1.484
Antigüedad: 20 años, 3 meses
Puntos: 13
Manejo de errores en VB6 ¡toma 2! ¡Accion!

mmmmm...... Tal vez no me exprese bien.... . Veamos...

Partiendo de la base que debo poner un On Error en cada procedimiento y, supongamos que en mi sistema hay 3 formularios y cada uno tiene 3 procedimientos, quiere decir que voy a tener 9 instrucciones On Error.

Ahora bien, ¿que pasa si en mi sistema hay mucho mas de tres formularios (y evidentemente en un formulario va a haber mas de tres procedimientos)? ¿Debo colocar un On Error en cada uno? ¿No puedo hacer algo asi?:

(supongamos...)

'Load del primer formulario que se ejecuta
Private Sub Form_Load()
On Error GoTo ErrorEnBas
...
End Sub

'Codigo de un Modulo .Bas
Private Sub ErrorEnBas
MsgBox ("El sistema tuvo un Error")
End sub


Espero que me hayas entendido
Saludos. Lucas