下列程序的功能是:当发生窗体的单击事件后,将在窗体上显示“1!+2!+3!+…+10!”的和。 Private Sub Form_Click() Dim s As Long,i As Integer s=0 For i=1

admin2009-02-13  34

问题 下列程序的功能是:当发生窗体的单击事件后,将在窗体上显示“1!+2!+3!+…+10!”的和。
   Private Sub Form_Click()
    Dim s As Long,i As Integer
    s=0
     For i=1 To 10
        s=s+【  】
     Next i
   Print s
   End Sub
   Private Function fact(ByVal n As Integer)As Long
        Dim i As Integer,f As Long
        f=1
        For i=2 To n
          f=f*i
        Next i
       【  】
   End Function

选项

答案fact(i) , fact=f

解析 本题的函数过程fact的作用是求参数n的阶乘。函数中通过一个For循环把从2乘到n的值放在变量f中,f就是n的阶乘。n的阶乘应该作为函数值返回,VB规定,要想函数过程返回一个值,可把这个值直接赋给函数名。所以[12]处应填“fact=f”。在Form_Click事件中,通过一个For循环把1到10的阶乘加到变量s中,因此在该循环中应该调用Fact函数过程得到循环变量i的阶乘,故[11]处应填“fact(i)”。
转载请注明原文地址:https://jikaoti.com/ti/tbq0FFFM
0

最新回复(0)