68301367 发表于 2009-3-6 12:08:00

[求助]下标越界的问题

PO = ThisDrawing.Utility.GetPoint<br/>Dim X()<br/>Dim Y()<br/><br/>X(0) = Int(PO(0)): Y(0) = Int(PO(1))<br/><br/>出现下标越界的错误

68301367 发表于 2009-3-6 15:47:00

没人能答吗？

fjfhgdwfn 发表于 2009-3-6 16:31:00

<p>要用REDIm重定义下了。</p>

fjfhgdwfn 发表于 2009-3-6 16:35:00

<p>Sub dd()<br/>Dim x() As Double<br/>I = 3<br/>ReDim x(I)<br/>x(0) = 10<br/>ReDim Preserve x(4)</p><p>MsgBox x(0)</p><p>End Sub<br/></p><p>看下帮助。什么都有。</p>
页: [1]
查看完整版本: [求助]下标越界的问题