2. 计算机
  3. 有下列程序，程序运行后单击命令按钮，则输出的结果是( )。 Private Sub Command1_Click() Dim a%(1 To 4),b%(3 To 6),i%,s1#,s2# For i=1 To 4 a(i)=i Next i Fo

有下列程序，程序运行后单击命令按钮，则输出的结果是( )。 Private Sub Command1_Click() Dim a%(1 To 4),b%(3 To 6),i%,s1#,s2# For i=1 To 4 a(i)=i Next i Fo

admin2010-11-20  29
问题 有下列程序，程序运行后单击命令按钮，则输出的结果是(    )。
Private Sub Command1_Click()
Dim a%(1 To 4),b%(3 To 6),i%,s1#,s2#
For i=1 To 4
a(i)=i
Next i
For i=3 To 6
b(i)=i
Next i
s1=Factorial(A)
s2=Factorial(B)Print"s1=";s1;"s2=";s2
End Sub
Function Factorial(a() As Integer)
Dim t#,i%
t=1
For i=LBound(A)To UBound(A)
t=t*a(i)
Next i
Factorial=t
End Function
选项 A、s1=360  s2=24
B、s1=24  s2=360
C、s1=24  s2=24
D、s1=360  s2=360
答案B
解析 Factorial函数的作用是计算参数数组a元素的累计乘积，即将数组a的元素从下界到上界循环相乘。在主调过程中，Factorial(A)、Factorial(B)分别传递数组a和b，计算结果分别赋给s1和s2。
转载请注明原文地址:https://jikaoti.com/ti/tjg0FFFM
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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