|
17.数组练习（1）
先不上机，试试分析下面程序段的运行结果是什么？
Dim intA(4) As Integer
Dim intB(4) As Integer
Dim i As Integer
For i = 0 To 2
intA(i + 1) = i * 2 + 1
intB(3 - i ) = intA(i + 1)
Next
Print intB(i)
呵呵，多上机练习练习就好了，这种题目经常在笔试题里面出现，要求分析程序的运行结果。
可以这样改动程序
Private Sub Form_Click()
Dim intA(4) As Integer
Dim intB(4) As Integer
Dim i As Integer
For i = 0 To 2
intA(i + 1) = i * 2 + 1
intB(3 - i) = intA(i + 1)
Next
Print intB(i) , i
Print "******************************"
For i = 0 To 4
Print intA(i), intB(i)
Next
End Sub
可以看到：
当第一个for循环结束后，“i”的值是3，所以第一个Print语句输出的是数组元素intB(3)的数值，
接下来我们输出一行“*”号来标志，
然后把数组intA和intB里的元素都显示出来，
这样就可以看到第一个For循环都干了些什么，呵呵，自己看看吧。
相关资料
| 
