【转帖】下标越界的问题
 

下标越界的问题
www.dimcax.com
下标越界的问题
po = thisdrawing.utility.getpoint
dim x()
dim y()
x(0) = int(po(0)): y(0) = int(po(1))
出现下标越界的错误

动态数组在vba里用前要用redim进行重定义，这和vb里略有不同，而vb里默认有10个元素
或者直接用固定维数的数组
dim x(2) as double
dim y(2) as double

这里有vba的资料

:
动态数组在vba里用前要用redim进行重定义，这和vb里略有不同，而vb里默认有10个元素
或者直接用固定维数的数组
dim x(2) as double
dim y(2) as double
照你所说的重新定义，还是会出现越界的情况，晕。