发布网友 发布时间:2023-10-27 01:12
共1个回答
热心网友 时间:2024-12-11 23:37
你的主要问题是
dim a(10)相当于定义了一个长度为10的数组. 因为你用Option Base 1声明了下标从1开始, 所以dim a(10) 相当于是 dim a(1 to 10);
dim i as Integer, 而i没有赋给初始值时, 默认赋值为0. 所以for i = i to 10第一个就开始从0循环, 就是a(0)了, 导致数组下标越界.
你是笔误了吧, 将for i = ito 10修改为for i = 1to 10