傳回或設定最初產生錯誤的物件或應用程式名稱。
語法
object.Source
引數:
Object:必要。一律是 Err 物件。
備註
Source 特性會指定字串表示式,通常是導致錯誤之物件的類別名稱或程式設計 ID。當您的程式碼無法處理所存取物件中產生的錯誤時,請使用 Source 提供使用者資訊。例如,如果您存取的程式碼產生除以零錯誤,則 Err.Number 會設為該錯誤的錯誤代碼。
Source 一律包含原始產生錯誤之物件的名稱 — 您的程式碼可以根據所存取物件的錯誤文件嘗試處理該錯誤。如果錯誤處理常式失敗,您可以使用 Err 物件資訊來向使用者描述錯誤,並利用 Source 和其他 Err,通知使用者最初導致錯誤的物件、錯誤的描述等等。
從程式碼產生錯誤時,Source 是您應用程式的程式設計 ID。
下列程式碼說明 Source 方法的用法。
範例 1:
Sub RaiseUserDefinedError()
On Error Resume Next ' Enable error handling.
Err.Raise 1, "SomeObject", "A custom error description."
Output = "Error # " & Err.Number & ": " & Err.Description & " Source: " & Err.Source
Err.Clear ' Clear the error.
End Sub
'Output : Error # -1: A custom error description. Source: SomeObject