Изменение кода и его запуск

[Hugo121]

Зачем там 10?

Gmax = 10 * Log(KIP * (3.14 * D / lambda) ^ 2)

Или тогда так (в хелпе углядели? ):

Public Function Gmax(KIP, D, lambda) As Double
Gmax = 10 * Log10(KIP * (3.14 * D / lambda) ^ 2)
End Function

Static Function Log10(X)
    Log10 = Log(X) / Log(10#)
End Function