下面运行程序后,单击命令按钮,输出的结果是 【9】 。 Private Sub Command1_Click() Dim a%(1 To 4),b%(3 To 6),i%,s1,s2For i=1 To 4 a(i)=iNextFor i=3 To 6 b(i)=iNext s1.= Fun(a) s2 =Fun(b) Print "s1 ="; s1; "s2 ="; s2 End Sub Fu

时间:2024-04-26 10:47:51

相似题目