【简答题】下列程序的输出结果是______。 Private Sub Commandl_Click() Dim alt(1 To 10) Fori=1 To 10 arr(i) =I Next i For Each i In arr() arr(i) =arr(i) *2+1 Next i MsgBox arr(7) End Sub
【简答题】下列程序的输出结果是______。 Private Sub Command1_Click() Dim arr(1 To 10) For i=l TO 10 arr(i)=i Next i For Each i In arr() art(i)=arr(i)*2+1 Next i MsgBox arr(7) End Sub