Erl

返回一个Long，包含引发运行时错误的最近执行语句的行号。

语法：Erl [ () ]

行号是语句前缀的数字标签，例如110:在110: x = 1 / 0中。它们是旧版Basic方言的遗留特性，保留主要是为了让错误处理程序能报告故障发生的位置。当错误在标记语句内引发时，Erl设置为该标签，当活动错误处理程序通过Resume、Resume Next或任何Exit语句退出时，Erl重置为0。

如果引发错误的语句没有前面的行号，Erl返回0。

示例

本示例使用Erl记录引发运行时错误的行号。

Sub Demo()
    On Error GoTo Handler
100:    Dim x As Double
110:    x = 1 / 0                      ' Generates a division-by-zero error.
        Exit Sub
Handler:
        Debug.Print "Error at line "; Erl    ' Prints "Error at line  110".
End Sub

另请参阅

• Err属性
• On Error语句