Example: General.ErrorLookup  (2)

[VB6 equivalent: API_ErrorLookup]

Dim strErrMsg As String
Dim i As Integer

For i = 0 To 10000
    strErrMsg = General.ErrorLookup(i)
    If (strErrMsg.Length > 0) Then
        Console.WriteLine(i & " = " & strErrMsg)
    End If
Next

See Also:
General.ErrorLookup Method

[Contents] [Index]