Question

帮帮忙，ACCESS数据库中计算问题,谢谢！急！

（34）在窗体中有一个命令按钮Command1，编写事件代码如下：
Private Sub Command1_Click()
Dim s As Integer
s = p(1) + p(2) + p(3) + p(4)
debug.Print s
End Sub
Public Function p (N As Integer)
Dim Sum As Integer
Sum = 0
For i = 1 To N
Sum = Sum + i
Next i
P = Sum
End Function
打开窗体运行后，单击命令按钮，输出的结果是 B
A）15
B）20
C）25
D）35
（31）在窗体中添加一个名称为Command1的命令按钮，然后编写如下事件代码：
Private Sub Command1_Click（）
Dim a（10，10）
For m＝2 To 4
For n＝4 To 5
a（m，n）=m*n
Next n
Next m
MsgBox a（2，5）＋a（3，4）＋a（4，5）
End Sub
窗体打开运行后，单击命令按钮，则消息框的输出结果是________。
A）22 B）32 C）42 D）52

（32）在窗体上添加一个命令按钮（名为Command1）和一个文本框（名为Text1），并在命令按钮中编写如下事件代码：
Private Sub Command1_Click（）
m＝2.17
n＝Len（Str$（m）＋Space（5））
Me!Text1=n
End Sub
打开窗体运行后，单击命令按钮，在文本框中显示________。
A）5 B）8 C）9 D）10

要过程，谢谢，初学，好多这样的不会。马上考试了，投机一下历年的计算题。

Answer 1

p(1)=1
p(2)=3
p(3)=6
p(4)=10
s=20
p（）是一个函数，每次出现p（）的时候，就是调用那个函数，当p（1）时，函数里面的N就是1，所以就是1到1 的求和，所以p（1）=1；当p（2）时，函数里面的N就是2,就是1到2的求和，所以p（2）=3
依此类推s=1+3+6+10=20

Answer 2

32:9