VS下编辑的公式如何转化成VBA公式

blizzcn

求助:
在别人的VS文件中看到一个公式,想转移到excel的VBA中,发现无法识别,有高手能翻译成VBA的公式吗

Public Function lv(l As Double, lg As Single, Vy As Single, sy As Single, VO As Single, HO As Single, MS As Single, a As Single, b As Single) As Double

             Dim value As Object

         

             Dim left2 As Object = CDec((MS / Vy))* 1000000.0

             Dim obj2 As Object =Operators.MultiplyObject(Operators.MultiplyObject(CDec(a)* Math.Pow(Math.Tanh(0.85 * CDec(sy)), 3.0) *Math.Pow(Math.Log(CDec(lg)), 0.15),Operators.ExponentObject(left2, -0.2)), 0.4 * Math.Tanh(CDec((VO / MS))) * Math.Tanh(0.15 * CDec(HO))+ 0.755)

              obj2 =Operators.DivideObject(Operators.MultiplyObject(obj2, l), Vy)

               value =100.0 * (1.0 - Math.Exp(Conversions.ToDouble(Operators.NegateObject(obj2))))

                           

               Return Conversions.ToDouble(value)

EndFunction

blizzcn

没人翻译吗