题目内容
(请给出正确答案)
[主观题]
阅读程序: Function fac(ByVal As Integer)As Integer Dim temp As Integer temp=1 For i%=
阅读程序: Function fac(ByVal As Integer)As Integer Dim temp As Integer temp=1 For i%=1 To n temp=temp*i% Next i% fac=temp End Function Private Sub Form. Click() Dim nsum As Integer nsum=1 For i%=2 T0 4 nsum=nsum+fac(i%) Next i% Print nsum End Sub 程序运行后,单击窗体,输出结果是()。
A.35
B.31
C.33
D.37
如搜索结果不匹配,请 联系老师 获取答案