Refactoring: Code optimieren - Teil 3

Magische Zahl durch Konstante ersetzen

Unter „magischen Zahlen“ versteht man Zahlen, die entweder in jedem Zusammenhang konstant sind (wie die Kreiszahl Pi oder die Erdbeschleunigung g) oder die zumindest im Kontext der kompletten Anwendung immer gleich sind.

Wenn Sie magische Zahlen an mehreren Stellen innerhalb Ihrer Anwendung einsetzen und immer die konkreten Zahlenwerte verwenden, sind Änderungen an dieser Zahl immer mit sehr hohem Aufwand verbunden. Besser ist es, anstelle der Zahl eine Konstante zu verwenden, die Sie an einer Stelle in der Anwendung festlegen. Dies können Sie beispielsweise in einem Standardmodul erledigen. Wenn Sie beispielsweise den Umfang eines Kreises mit der Funktion aus Listing 6 ermitteln, wird es Zeit für den Einsatz einer Konstanten.

Public Function UmfangBerechnen(sngRadius As Single) As Single
UmfangBerechnen = 2 * sngRadius * 3.14159
End Function

Sie führen dann in einem Standardmodul mit folgender Anweisung eine Konstante namens pi für die Kreiszahl ein:

Public Const pi = 3.14159

Anschließend können Sie wie in der Funktion aus Listing 7 auf die Konstante zugreifen.

Public Function UmfangBerechnenConst(sngRadius As Single) As Single
UmfangBerechnenConst = 2 * sngRadius * pi
End Function