# Pattern 属性

object.Source [= stringexpression]

返回或设置最初生成错误的对象或应用程序的名称。

参数 描述
object 必选项。Err 对象。
stringexpression 可选项。字符串表达式,表示生成错误的应用程序。

说明 Source 属性指定一个字符串表达式,此表达式通常是导致错误的对象的类名称或程序设计的 ID。当代码无法处理可访问对象产生的错误时,请使用 Source 为用户提供信息。例如,如果访问 Microsoft Excel 并且产生一个被零除的错误,Microsoft Excel 将 Err.Number 设置为此错误的错误代码并将 Source 设置为 Excel.Application。注意,如果错误产生于另一个由 Microsoft Excel 调用的对象中,则 Excel 截获此错误并且将 Err.Number 设置为它自己的被零除的代码。但是,它保留其他 Err 对象(包括 Source),就象由产生错误的对象设置一样。

Source 总是含有最初产生错误的对象名称,您可根据所访问对象的错误信息文档,编写处理错误的代码。若错误处理程序失败,则可使用 Err 对象信息为用户描述错误,使用 Source 和其他 Err 通知用户最初导致错误的对象、错误描述等等。

在代码中产生错误时,Source 是应用程序的程序设计 ID 。

下面代码举例说明如何使用 Source 属性:

On Error Resume Next
Err.Raise 6   ' Raise an overflow error.
MsgBox ("Error # " & CStr(Err.Number) & " " & Err.Description & Err.Source)
Err.Clear   ' Clear the error.
1
2
3
4
应用于