K4过程与自定义函数 中显示 元素进行 共数组

某程序段如下：
Private Sub Command1_Click()
Dim s As Integer, m As Integer, i As Integer
m = 5: s = 0
For i = 1 To m
s = s + add(i)
Next i
Text1. Text = Str(s)
End Sub
Function add (n As Integer) As Integer
If n = 1 Or n = 2 Then add = 1 Else add = 2 * (add(n-1)+add(n-2))
End Function
若运行该段程序后，标签Text1中显示的值是（    ）

A.16

B.44

C.6

D.32



本题考查自定义函数和数组基本运算知识。根据自定义函数可知，add（1）=1，add（2）=1.add（3）=4，add（4）=10，add（5）=28，然后将add（1）到add（5）共5个数组元素进行相加，得到s的结果为44，选项B正确。