为什么要求常数表达式??
win2000,AutoCAD2002 VBA写了一段程序,
Public Function closeCurPt(ByVal ptOpenPit As Variant, _<BR>ByRef segOpenPit As Variant) As Variant<BR> Dim countArr As Integer<BR> countArr = ptOpenPit.Count - 1<BR> Dim ptArr(countArr) As Double
。。。。。。。
编译错误:要求常数表达式。(ptArr数组)
在定义ptArr数组的时候,countArr 应该已经有值了,为什么不行呢?
将Dim ptArr(countArr) As Double 换成Dim ptArr(9) As Double 进行调试,
countArr的值是45。
帮看一下好吧,谢谢! 除非使用数字,否则定义不确定个数的数组,即动态数据,应该:<BR> Dim ptArr() As Double
ReDim ptArr(countArr) 点一下就帮我解决了大半天的问题,多谢!
页:
[1]