Tag: power series

如何将SERIESSUM函数转换为VB6?

在已故的Frank Kabel撰写的Excel网站Daily Dose上 ,有一些公式可以代表ATPfunction。 不是一个Excel大师,我正在努力将一个(到目前为止!)转换为VB6。 (为什么我这样做,我可能会涉及一旦NDA用完。) 我遇到的问题是SERIESSUM的代码, =SUMPRODUCT(coefficients,x^(n+m*(ROW(INDIRECT("1:"&ROWS(coefficients)))-1))) 现在,SUMPRODUCT和ROWS函数已经能够相当简单地渲染了 Public Function SUMPRODUCT(a1 As Variant, a2 As Variant) As Double Dim dRes As Double Dim dVal As Double Dim i As Long If LBound(a1) = LBound(a2) And UBound(a1) = UBound(a2) Then For i = LBound(a1) To UBound(a1) dVal = a1(i) * a2(i) dRes = dRes + […]