2. 计算机
  3. 下列程序运行后的输出结果是【 】。 Private Sub f(k,s) s=1 For j=1 To k s=s*j Next End Sub Private Sub Command1_Click() Sum=0 For i=1

下列程序运行后的输出结果是【 】。 Private Sub f(k,s) s=1 For j=1 To k s=s*j Next End Sub Private Sub Command1_Click() Sum=0 For i=1

admin2013-04-11  61
问题 下列程序运行后的输出结果是【  】。
Private Sub f(k,s)
s=1
For j=1 To k
    s=s*j
Next
End Sub
Private Sub Command1_Click()
Sum=0
For i=1 To 3
    Call f(i,s)
    Sum=Sum+s
Next
Print Sum
End Sub
选项
答案9
解析 Rnd产生随机数的范围为(0.1110.999);因此,Rnd*10的范围为(0.111 9.999);Int()函数是取整, Int(Rnd*10)取整后的范围为(1 9);再加上10,所以试值的取值范围为(10 19)。
转载请注明原文地址:https://kaotiyun.com/show/Pphp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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