回傳或設定一個字 串表達 式，指定最初產生錯誤的物件或應用程式名稱。 讀取/寫入。
註解
Source 屬性指定一個字串表達式，代表產生錯誤的物件;這個表達式通常是物件的類別名稱或程式識別碼。
當程式碼無法處理被存取物件產生的錯誤時，使用 Source 提供資訊。 例如，如果你存取 Microsoft Excel 並 Division by zero 產生錯誤，Excel 會將 Err.Number 設為該錯誤的錯誤代碼，並將 Source 設為 Excel.Application。
從程式碼產生錯誤時， Source 是你應用程式的程式識別碼。 對於 類別模組， Source 應該包含一個 project.class 這個形式的名稱。
當你的程式碼發生意外錯誤時，原始 碼 屬性會自動被填補。 標準 模組中錯誤時， Source 會包含 專案 名稱。 對於類別模組中的錯誤， Source 會包含帶有 project.class 表單的名稱。
範例
此範例將 Visual Basic 中建立的自動化物件的程式化 ID 指派給變數MyObjectID，並在 Raise 方法產生錯誤時，將該 ID 指派給 Err 物件的 Source 屬性。
處理錯誤時，不應使用 原始 碼屬性 (或程式化的 Err 屬性，除了 Number) 。 除了 數字 之外，屬性唯一有效的用途是用來向終端使用者顯示豐富的資訊，以防你無法處理錯誤。 範例假設 和 AppMyClass 是有效的參考。
Dim MyClass, MyObjectID, MyHelpFile, MyHelpContext
' An object of type MyClass generates an error and fills all Err object
' properties, including Source, which receives MyObjectID, which is a
' combination of the Title property of the App object and the Name
' property of the MyClass object.
MyObjectID = App.Title & "." & MyClass.Name
Err.Raise Number := vbObjectError + 894, Source := MyObjectID, _
Description := "Was not able to complete your task", _
HelpFile := MyHelpFile, HelpContext := MyHelpContext
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。