2. 计算机
  3. 有如下函数过程： Function f1(x As Integer)As Long Dim s As Long，i As Integer s=0 For i=1To x s=s+i Next i f1=s End Function 在窗体上添加一个命令按钮

有如下函数过程： Function f1(x As Integer)As Long Dim s As Long，i As Integer s=0 For i=1To x s=s+i Next i f1=s End Function 在窗体上添加一个命令按钮

admin2019-06-20  50
问题 有如下函数过程：
Function f1(x As Integer)As Long
Dim s As Long，i As Integer
s=0
For i=1To x
s=s+i
Next i
f1=s
End Function
在窗体上添加一个命令按钮，名为Command1，并编写事件过程调用该函数，则输出结果为(    )。
Private Sub Command1_Click()
Dim i As Integer，sum As Long
For i=1To5
sum=sum+f1(i)
Next i
Print sum
End Sub
选项 A、25
B、35
C、45
D、55
答案B
解析 本题考查函数过程的功能分析。函数f1的主要功能是计算1到x的累加和，也就是计算1+2+…+x。在命令按钮的单击事件中循环程序调用了5次f1函数，sum计算为：1+1+2+1+2+3+1+2+3+4+1+2+3+4+5。因此结果为35。
转载请注明原文地址:https://jikaoti.com/ti/WhN0FFFM
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)