2. 计算机
  3. 下面程序运行时，单击窗体后，窗体上显示的结果是( )。 Private Sub Form_Click( ) Dim iAs Integer Dim sum As Long Dim t As Long t=1：sum=0 For i=1

下面程序运行时，单击窗体后，窗体上显示的结果是( )。 Private Sub Form_Click( ) Dim iAs Integer Dim sum As Long Dim t As Long t=1：sum=0 For i=1

admin2018-05-08  38
问题 下面程序运行时，单击窗体后，窗体上显示的结果是(     )。
Private Sub Form_Click(     )
Dim iAs Integer
Dim sum As Long
Dim t As Long
t=1：sum=0  
For i=1 To 3
t=t*i
sum=sum+t
Next i
Print sum
End Sub
选项 A、3
B、9
C、5
D、6
答案B
解析 考查累加算法。题目中sum为求和项，初值为0，t为每一项的值，变化规律为后一项是前一项的i倍，i的变化为从1到3，由于t的初值为1，因此求和为1*1+1*2+2*3。
转载请注明原文地址:https://www.kaotiyun.com/show/QSGp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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