ante todo saludos..
soy un novato en vb6.0 y bueno estoy haciendo un sistema de cuentas por pagar
y quiero que por favor me ayuden a menejar errores con los eventos movelast. movenext etc
gracias
| |||
como manejo errores ante todo saludos.. soy un novato en vb6.0 y bueno estoy haciendo un sistema de cuentas por pagar y quiero que por favor me ayuden a menejar errores con los eventos movelast. movenext etc gracias |
| |||
Respuesta: como manejo errores Aca Te Dejo Un Ejemplo Controlado 2 Errores... Si Tenes alguna Duda Avisa!! Tambien Te dejo El Link de MSDN... Pegale una Leidita...
Código:
Private Sub Form_Load() On Error GoTo Chequear_Errores Dim Var1 As Integer Dim Var2 As Integer Dim Var3 As Byte Var1 = 1000 Var2 = 0 MsgBox Var1 / Var2 Var3 = Var1 MsgBox "By agus0" Exit Sub Chequear_Errores: If Err.Number = 11 Then '11 es El Numero de error de "Division Por 0" Var2 = 2 Resume 'Se Usa Para Volver donde se Produjo el Error ElseIf Err.Number = 6 Then 'Error 3 = Desbordamiento Resume Next 'Se Utiliza para Omitir esa Linea y segur Con la Siguiente End If End Sub |
Etiquetas: |