ciao
esiste la funzione Math.Log che calcola il logaritmo in base e o, se chiamata con due argomenti, in base newBase.
Altrimenti potresti sfruttare le proprietà dei logaritmi:
per calcolare il logaritmo in base b di un numero x calcoli il logaritmo in base k di x e lo dividi per il logaritmo in base k di b.
Potendo tu calcolare il logaritmo in base 10 (o e) di x e di b, il problema è risolto.
Ti scrivo la funzione nel caso non sia stato abbastanza chiaro
Function Logaritmo(ByVal Base As Double, ByVal x As Double) as Double
Return (Math.Log10(x) / Math.Log10(Base))
End Function