主观

下列程序的输出结果是______。

 Private Sub Command1_Click()

 Dim arr(1To 10)

 For i=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

参考答案
您可能感兴趣的试题
¥

订单号:

遇到问题请联系在线客服

订单号:

遇到问题请联系在线客服