Name der Function als greifbare Wert?
03.05.2006 13:34:32
Yal
schon wieder habe ich eine undokumentierte Nuss. Wer wird sie knacken können?:
Gibt es eine Möglichkeit, auf die Funktionsnamen automatisch zuzugreifen? zB um diese in eine Fehlermeldung einzubeziehen.
Bis jetzt muss ich für jede Funktion/Prozedure eine Const FNAME mit dem Name deklarieren. Besser wäre, der Kompiler weisst, in welche Funktion er sich befindet, um darauf zugreifen zu können.
Function TueEtwas()
Const FNAME = "TueEtwas"
On error Goto Catch
Try:
TueEtwas = cIstOk
Goto Finally
Catch:
Select Case Err.Number
Case ...
Case Else
Msgbox "unbekannte Fehler " & Err.Number & " in """ & FNAME & """"
End Select
TueEtwas = cIstNichtOk
Finally:
End Function
Yal, ratlos.