Source-Eigenschaft
Returns or sets a string expression specifying the name of the object or application that originally generated the error. Lese-/Schreibzugriff.
Hinweise
Die Source-Eigenschaft gibt einen Zeichenfolgenausdruck an, der das Objekt darstellt, das den Fehler generiert hat. Der Ausdruck ist in der Regel der Klassenname oder die programmgesteuerte ID des Objekts.
Use Source to provide information when your code is unable to handle an error generated in an accessed object. Wenn Sie beispielsweise auf Microsoft Excel zugreifen und ein Division by zero
Fehler generiert wird, legt Excel Err.Number auf den Fehlercode für diesen Fehler und source auf fest Excel.Application
.
Beim Generieren eines Fehlers aus Code entspricht die Source-Eigenschaft der Programmkennung Ihrer Anwendung. Für Klassenmodule sollte die Source-Eigenschaft einen Namen im Format Projekt.Klasse enthalten.
Wenn in Ihrem Code ein unerwarteter Fehler auftritt, wird die Source-Eigenschaft automatisch ausgefüllt. Für Fehler in einem Standardmodul enthält die Source-Eigenschaft den Namen für das Projekt. Für Fehler in einem Klassenmodul beinhaltet die Source-Eigenschaft einen Namen im Format Projekt.Klasse.
Beispiel
In diesem Beispiel wird die programmatische ID eines in Visual Basic erstellten Automation-Objekts der Variablen MyObjectID
zugewiesen und dann der Source-Eigenschaft des Err-Objekts zugewiesen, wenn ein Fehler mit der Raise-Methode generiert wird.
Bei der Behandlung von Fehlern sollten Sie die Source-Eigenschaft (oder andere Err-Eigenschaften als Number) nicht programmgesteuert verwenden. Die Verwendung anderer Eigenschaften als Number ist nur für die Anzeige umfangreicher Informationen für einen Endbenutzer gültig, wenn Sie einen Fehler nicht behandeln können. Bei dem Beispiel wird davon ausgegangen, dass App
und MyClass
gültige Verweise sind.
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
Siehe auch
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.