Source 属性
返回或设置最初生成错误的对象或应用程序的名称。
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 NextErr.Raise 6 ' Raise an overflow error.MsgBox ("Error # " & CStr(Err.Number) & " " & Err.Description & Err.Source)Err.Clear ' Clear the error.