VBA等差数列实例讲解
等差数列是个比较简单的数学排列,也是容易理解的一个数列格式。
本节举一个示例来演示一下,什么是等差数列。
如下图所示,等数列执行一些代码后就以等并方式进行显示出来了。
等差数列是常见数列的一种,如果一个数列从第二项起,每一项与它的前一项的差等于同一个常数,这个数列就叫做等差数列,而这个常数叫做等差数列的公差,公差常用字母d表示。例如:1,3,5,7,9……1+2。
等差数列的通项公式为:an=a1+d 前n项和公式为:或Sn=n/2。
注意:以上n均属于正整数。
代码
Private Sub CommandButton2_Click
'计算等差数列
Dim R As Range
Dim n As Integer
Dim Q As Double
Dim i As Integer
Dim sArr
Set R = Range
n = R.Rows.Count
If n <= 1 Then Exit Sub
Q = R.Cells.Value '比例值
For i = 1 To n
If i = 1 Then
R.Cells.Value = R.Cells.Value
Else
R.Cells.Value = R.Cells.Value + Q
End If
Next i
End Sub
学好数学是编程进阶的基本条件,如果要对代码进行高质量应用,那就是需要相对完整的数学逻辑,这样才对编码有一个很好的把握,不然的话,可能会出现形形色色的问题。
电脑运行的基础就是数学计算,无论怎么改变,目前的计算机底层逻辑是不会改变的。
所以,数学是必要的一个知识。
欢迎关注、收藏
---END---