For 循环的 问题

OPtinon Base 1
Cosnt N =10 定义常量N=10
Dim A(N) As Integer 定义A(N)为整型变量数组
Dim intCount As Integer 定义intcount为整型变量 用于计数
Dim intTemp As Integer 定义了一个临时的整型变量 用于暂时记录每次的旧的A(intcout)
For intCount = 1To N\2 FOR循环语句， intcout从1到N/2
intTemp = A(intCount) 赋予inttemp值：旧的A(intcout)值
A(intCount)= A(n-intCount+1) 赋予A(intcount)新值：A(n-intCount+1)
A(n-intCount+1)= intTemp 赋予A(n-intCount+1)新值： inttemp
实际上是A(intCount)和A(n-intCount+1)交换了一下数值
Next

OPtinon Base 1，拼写错误，应该是：Option Base 1，意思是设置数组的下限从1开始。
Cosnt N =1，拼写错误，应该是：Const N=1，设置常量N的值为1
下面的…哎，都基本的东西，一看就懂的。

OPtinon Base 1 '错误，正确的是Option base 1 意思是数组的下界默认为1，不然是0的
Cosnt N =10 定义常量N为10
Dim A(N) As Integer 定义数组A（N），说明数组A有N个值，这对维护代码有帮助
Dim intCount As Integer 定义 变量intCount
Dim intTemp As Integer 定义 变量intTemp
For intCount = 1To N\2 变量intCount容1开始循环一直到N\2，也就是5，也就是循环5次
intTemp = A(intCount) 把数