类似excel中的product函数如何实现积乘？

wang　发表于：2015-05-19 10:25:45 　

类似excel中的product函数如何实现积乘？如何在access实现？有没有将符合条件纪录乘在一起的函数？

煮江品茶发表于：2015-05-19 10:27:26

自定义一个函数即可。

Public Function Product(ParamArray vals() As Variant) As Double
'功能：返回乘积
'示例：MsgBox Product(2, 3, 5)
Dim pr As Double
Dim i As Integer
pr = 1
For i = 0 To UBound(vals)
pr = pr * vals(i)
Next
Product = pr
End Function

Top

总记录：1篇页次：1/1 9 1 :

Access交流中心

[5分]类似excel中的product函数如何实现积乘？