VBA等差数列实例讲解

核心提示VBA等差数列实例讲解等差数列是个比较简单的数学排列,也是容易理解的一个数列格式。本节举一个示例来演示一下,什么是等差数列。如下图所示,等数列执行一些代码后就以等并方式进行显示出来了。等差数列是常见数列的一种,如果一个数列从第二项起,每一项

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---

 
友情链接
鄂ICP备19019357号-22