下面程序运行后,单击命令按钮,输出的结果是______。Private Sub Command1_Click()Dim a%(1 To 5),

题目

下面程序运行后,单击命令按钮,输出的结果是______。

Private Sub Command1_Click()

Dim a%(1 To 5),i%,s

For i=1 To 5

a(i) =i

Next

s=Fun(A)Print "s=";s;

End Sub

Function Fun(a() As Integer)

Dim t,i%

t=1

For i=LBound(A)To UBound(A)t=t*a(i)

Next

Fun=t

End Function

更多“下面程序运行后,单击命令按钮,输出的结果是______。Private Sub Command1_Click()Dim a%(1 To 5), ”相关问题