Problema con el control de errores.
Publicado por TeenSpirits (41 intervenciones) el 20/05/2005 13:22:24
quiero utilizar el control de errores para hacer una especie de desvío condicional (es decir utilizar el error para que el flujo del programa vaya por un sitio u otro). Pero el problema es que esa "condición" está dentro de un bucle y entonces a la segunda vez que me dá el error no me salta a la etiqueta sino que salta directamente el mensaje de error. ¿Cómo puedo hacer? Te voy a poner una función de ejemplo para que lo entiendas mejor.
Private Sub Command1_Click()
On Error GoTo siguiente
For i% = 1 To 6
aux% = CInt(cadena)
siguiente:
Next i%
End Sub
Me vas a decir que esto mismo se puede hacer con un Resume next en lugar de un Goto etiqueta, pero es que necesito saber cómo lo puedo hacer con un goto etiqueta (si es que se puede). Ya te digo que de este modo sólo me salta a la etiqueta la primera vez que se produce el error.
Gracias y un Saludo!!
Private Sub Command1_Click()
On Error GoTo siguiente
For i% = 1 To 6
aux% = CInt(cadena)
siguiente:
Next i%
End Sub
Me vas a decir que esto mismo se puede hacer con un Resume next en lugar de un Goto etiqueta, pero es que necesito saber cómo lo puedo hacer con un goto etiqueta (si es que se puede). Ya te digo que de este modo sólo me salta a la etiqueta la primera vez que se produce el error.
Gracias y un Saludo!!
Valora esta pregunta


0