Erl

From: "Lyle Fairfield" <lylefairfield@xxxxxxx>
Date: 31 Dec 2005 13:13:52 -0800

Visual Basic Language Reference
Erl Property
Returns an integer indicating the line number of the last executed
statement. Read-only.
Public ReadOnly Property Erl() As Integer
Remarks
If Visual Basic encounters no line numbers, it returns 0.

Sub Blah()
10 Dim rst As DAO.Recordset
20 On Error GoTo BlahErr
30 GoTo BlahExit
40 MsgBox "Yes"
BlahExit:
rst.Close
Exit Sub
BlahErr:
MsgBox "ERL returns: " & Erl _
& vbNewLine _
& vbNewLine _
& "But the Error didn't occur at :" & Erl & "!" _
& vbNewLine _
& "In fact Line " & Erl & " is Never Run!" _
& vbNewLine _
& vbNewLine _
& "Use <Ctrl><Break> to exit.", vbInformation, "FFDBA"
Resume BlahExit
End Sub

.

Follow-Ups:
- Re: Erl
  - From: Randy Harris

Prev by Date: Re: =Iff(([Me]![Gender])="M","Male","Female")
Next by Date: Re: DAO peculiarity in A97?
Previous by thread: Change event trigger
Next by thread: Re: Erl
Index(es):
- Date
- Thread

Relevant Pages

Re: Erl
... >Returns an integer indicating the line number of the last executed ... >Public ReadOnly Property Erl() As Integer ... > & vbNewLine _ ...
(comp.databases.ms-access)
Re: Erl
... > Erl Property ... > Returns an integer indicating the line number of the last executed ... > Public ReadOnly Property Erl() As Integer ... > & vbNewLine _ ...
(comp.databases.ms-access)