作业帮 > 综合 > 作业

execl中如何求多数的均方根值?

来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/06/10 06:00:20
execl中如何求多数的均方根值?
有时也称方均根.英语写为:Root Mean Square(RMS).
 美国传统词典的定义为:The square root of the average of squares of a set of numbers.  即:将N个项的平方和除以N后开平方的结果,即方均根的结果.
插入控件
输入以下代码
Private Sub CommandButton1_Click()
s = 0
For i = 1 To x
s = s + Cells(i,1)
Next
Cells(x + 1,1) = sqrt(s / x)
End Sub
---------------
其中?为第一列数目的总个数(假设你的数据都在第一列,若在第N列,将Cells(i,1)
变为Cells(i,n)
所求数据在提供数据的下方