Refactoring: Code optimieren - Teil 2

Routine integrieren

Manchmal enthält eine Routine so wenig Code und ist so selbsterklärend, dass eigentlich keine Methode dafür erforderlich ist. Dabei darf diese Methode natürlich nicht von mehreren Stellen aus referenziert werden, sonst würde eine Integration der Routine in den Code dazu führen, dass Änderungen an selbiger an mehreren Stellen gleichzeitig durchzuführen wären. Wenn Sie beispielsweise irgendwo im Code eine Funktion finden, die etwa Multiplizieren heißt und zwei per Parameter übergebene Werte multipliziert, sollten Sie eine Integration der enthaltenen Funktionalität in die aufrufende(n) Routinen in Erwägung ziehen.

Dabei ersetzen Sie in der aufrufenden Routine den Aufruf durch den Inhalt der aufgerufenen Funktion. Wenn Tests zeigen, dass die aufrufende Funktion wie gewohnt funktioniert, können Sie die aufgerufene Funktion entfernen.

Im folgenden Codeausschnitt wird eine solche Funktion aufgerufen, um eine denkbar einfache Berechnung durchzuführen:

Dim intWert1 As Integer
Dim intWert2 As Integer
Dim intErgebnis As Integer
'....
intErgebnis = Multiplizieren(intWert1, intWert2)
'....

Die aufgerufene Funktion sieht so aus:

Public Function Multiplizieren(intWert1 As Integer,
intWert2 As Integer) As Integer
Multiplizieren = intWert1 * intWert2
End Function

Nach der Integration des in der aufgerufenen Funktion enthaltenen Algorithmus müssen Sie nur noch sicherstellen, dass die Namen der übergebenen Variablen mit den Namen der Parameter der aufgerufenen Funktion übereinstimmen. Ist das nicht der Fall, müssen Sie für die ehemaligen Parameter die im Aufruf verwendeten Variablennamen einsetzen.

Die folgende Zeile ersetzt nun den Aufruf der Funktion:

'....
intErgebnis = intWert1 * intWert2
'....