下面运行程序后,单击命令按钮,输出出的结果是 【12】 。 Private Sub Command1_Click() Dim a% (1 To 5) ,i%, sFor i = 1 To 5 a(i) =iNexts = Fun(a)Print"s="; s; End Sub Function Fun(a() As Integer) Dim t, i% t=1For i = LBound(a)
主观题
下面运行程序后,单击命令按钮,输出出的结果是 【12】 。 Private Sub Command1_Click() Dim a% (1 To 5) ,i%, sFor i = 1 To 5 a(i) =iNexts = Fun(a)Print"s="; s; End Sub Function Fun(a() As Integer) Dim t, i% t=1For i = LBound(a)