在 Basic 中计算对数自身底数（LibreOffice Calc 宏）

Question

LibreOffice 具有功能 LOG(x;n)，您可以在其中定义自己的基础。

但是我在Basic中用Macro写函数的时候，没有考虑第二个参数，所以计算自然对数。
Basic语言如何用自己的底计算对数？

Answer 1

有一个简单的公式可以使用自然对数以任何底数计算。函数 LogBase 取自 Andrew Pitonyak 的 OpenOffice.org Macros Explained 第 79 页。

Sub MyLogarithm
    MsgBox(LogBase(256,4))
End Sub

Function LogBase(x, b) As Double
    LogBase = Log(x) / Log(b)
End Function

Excel 和 VBA 也这样做：.

Calculating logarithm own base in Basic (LibreOffice Calc Macro)