Option Base 1 强制数组下标为1,Dim Y(10 To 60) As Integer 你这句话把下标设为10,与上面的强制发生冲突.把Option Base 1 这句删除
数组下标是从0开始的.也就是说X(20)最小下标0最大19For i = 0 To 19 X(i) =...Next i
