vb6.0练习题

来源:百度知道 编辑:UC知道 时间:2024/05/22 17:30:06
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
程序是计算这个表达式:1!+2!+3!=?
Sub f(k, s)是自定义的过程用来计算K阶阶乘,S保存K阶阶乘的结果;
Sub command1_click()是点击按钮command1后执行的代码,该代码是计算
表达式:1!+2!+3!=?的值。
你可以把代码复制到vb中,form中添加一个按钮就可以,然后把代码全部“覆盖”到代码区就可以

1,2,3