AW: Frage zu Erl
13.01.2006 23:00:50
Ramses
Hallo
Raise wird zum Erzeugen von Laufzeitfehlern verwendet und kann anstelle der Error-Anweisung verwendet werden.
Mal ein Auszug der VBA-Hilfe
Raise-Methode (Beispiel)
Raise ist hilfreich beim Erzeugen von Fehlern, wenn Sie Klassenmodule schreiben, da das Err-Objekt mehr Informationen zur Verfügung stellt als die Error-Anweisung. Mit der Raise-Methode kann zum Beispiel der ursprüngliche Auslöser des Fehlers in der Source-Eigenschaft angegeben werden, oder Sie können auf die Hilfe für den Fehler verweisen usw.
In diesem Beispiel wird die Raise-Methode des Err-Objekts verwendet, um einen Fehler innerhalb eines Automatisierungsobjekts, das in Visual Basic geschrieben wurde, zu erzeugen. Es enthält die Ressourcenkennzeichnung Proj1.Objekt1. Auf dem MacIntosh ist die Standardlaufwerkbezeichnung "HD", und die Bestandteile eines Pfades werden durch Doppelpunkte statt umgekehrter Schrägstriche voneinander getrennt.
Const Kontext1 = 1010407 ' Konstante für Kontextkennung
' definieren.
Function TestName(AktName, NeuName)
If Instr(NeuName, "Rita") Then ' Gültigkeit von NeuName überprüfen.
' Fehlerzustand auslösen
Err.Raise vbObjectError + 513, "Proj1.Objekt1", _
"Name darf ""Rita"" nicht enthalten", "c:\Proj1\Hilfe1.Hlp",Kontext1
End If
End Function
Gruss Rainer