题目内容:
在窗体中有一个命令按钮Command1,编写事件代码如下:Private Sub Command1_Click()
DimsAsInteger
s = p(1) + p(2) + p(3) + p(4)
debug.Print s
End Sub
Public Function p (NAsInteger)
DimSumAsInteger
Sum = 0
For i = 1 To N
Sum = Sum + 1
Next i
P = Sum
End Function
打开窗体运行后,单击命令按钮,输出的结果是
A.15
B.20
C.25
D.35
参考答案:
答案解析: