Funktion liefert zwei Ergebnisse

Hallo an Alle,
ich habe drei Funktionen in VBA erstellt. Funktion 1 und Funktion 2 werden dann in Funktion 3 (mc) aufgerufen.
Wenn ich nun in der
Funktion mc z und f einzeln ausrechne, dann ergibt sich das richtige Ergebnis. Wenn ich nun _
aber alles in eine Zeile schreibe, dann ergibt sich ein falsches Ergebnis. Wie kann denn das sein?
Hier mein kurzer Code.

Function mc(eco As Double, ecu As Double, ec As Double, ecgrenz As Double, n As Double, b As  _
Double, h As Double, fk As Double, fd As Double, SDB As String) As Double
Dim f As Double
Dim z As Double
z = (zP(eco, ecu, ec, n, h) - h / 2)
f = fc(eco, ecu, ec, ecgrenz, n, b, h, fk, fd, SDB)
'richtiges Ergebnis
mc = z * f
'falsches Ergebnis  (alles in einer Zeile)
mc = (zP(eco, ecu, ec, n, h) - h / 2) * fc(eco, ecu, ec, ecgrenz, n, b, h, fk, fd, SDB)
End Function