填空题

下列程序运行后的输出结果是 【9】 。
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

【参考答案】

I
<上一题 目录 下一题>
热门 试题

填空题
在KeyPress事件过程中，KeyAscii是所按键的 【6】 值。
填空题
下列程序的功能是：将数据1，2，…，8写入顺序文件Num.txt中，请补充完整。 Private Sub Form_Click() Dim i As Integer Open Num.txt For Output As#1 For i=1 To 8 【8】 Next Close #1 End Sub
相关试题