填空题

下面程序运行后，单击命令按钮，输出的结果是______。 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

【参考答案】

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

填空题
如果不指明函数过程参数的类型，则该参数的数据类型为______。
填空题
设有如下程序：Private Sub Form_Click()Dim a As Integer，s As Integern=8：s=0Dos=s+n：n=n-1Loop While n＞0Print sEnd Sub以上程序的功能是计算1-8的和。程序运行后，单击窗体，输出结果为______。
相关试题