This is preliminary documentation and subject to change.
To comment on this topic, please send us email at ngwssdk@microsoft.com. Thanks!
Err Object Example
This example uses the properties of the
Err object in constructing an error-message dialog box. Note that if you use the
Clear method first, when you generate a Visual Basic error with the
Raise method, Visual Basic's default values become the properties of the
Err object.
Dim Msg
' If an error occurs, construct an error message
On Error Resume Next ' Defer error handling.
Err
.Clear
Err
.Raise 6 ' Generate an "Overflow" error.
' Check for error, then show message.
If Err
.Number <> 0 Then
Msg = "Error # " & Str(Err
.Number) & " was generated by " _
& Err
.Source & Chr(13) & Err
.Description
MsgBox Msg, , "Error", Err
.Helpfile, Err
.HelpContext
End If