in vb isses ganz praktisch für Errorhandling...
man muss es halt sinnvoll einsetzen
Code:
Private Function Ficken() As Boolean
Dim i As Long
Dim X As Variant
On Error GoTo ErrorMark
X = "Hallo Welt"
i = X ' fehler...
Ficken = True ' ihr werdet wohl nie Ficken^^
GoTo Leave: 'oder Exit Funciton/Sub
ErrorMark:
MsgBox Err.Description & vbNewLine & Err.Number 'o.Ä
Debug.Assert False ' man kann auch Strg+Pause klicken wärend man in der Ide die msgbox angezeigt bekommt, dann einmal F8 und dann springt man zu Resume..
Resume ' nur benutzen um die fehler auszubessern, man spring an die stelle wo der fehler auftritt, wenn man das programm so weitergibt und ein fehler auftaucht gibts ne 100%ige CPU auslastung... da es eine endlos schleife ist...
Leave:
' Man kann hier halt noch iwas machen, egal ob nen fehler aufgetaucht ist oder nicht, man springt hier immer rein..
End Function