Re: [VB6 ] 計算機

[TrueFeeling (昨日之死)]

※ 引述《TrueFeeling (昨日之死)》之銘言：
: 續上次做到一半的計算機:
: 在Stop之前都可以正常運作
: 之後是因為宣告二維陣列出問題嗎
: 出現了錯誤消息:
: ---------------------
: Run-time error'9'
: Script out of range
: ---------------------
: ++++
: 程式草稿:
: http://0rz.net/2d0qK
: ++++
: Stop
:     For I = 1 To N
:        Do
:           ReDim Preserve C(I, M)
:           ReDim Preserve D(I, M)
剛剛測試的結果,問題好像出在上面這兩行
所以應該是二維陣列用法錯誤
好像宣告二維陣列前面那一維必須是常數?

:           Q = InStr(1, B(I), "*")
:           R = InStr(1, B(I), "/")

--
少年讀書，如隙中窺月；
中年讀書，如庭中望月；
老年讀書，如臺上玩月。

--
※ 發信站: 批踢踢實業坊(ptt.cc) 
◆ From: 220.141.159.236
推 LPH66:沒錯  ReDim只能重訂最後一維的維度
推 TrueFeeling:因為我以為前面那個N已經固定了,所以前面
→ TrueFeeling:那一維不會被改變,結果他根本只接受常數的樣
→ TrueFeeling:子
推 fumizuki:不是常數的問題
推 fumizuki:請看我上面回的
→ fumizuki:第1024篇
推 TrueFeeling:但是我的N在第1個DoLoop的時候已經不會變了
推 fumizuki:不是N的關係，是I
推 fumizuki:就說前面的上限都不能變
推 fumizuki:你原本就沒有指定上限，只個一維陣列
推 fumizuki:你在迴圈中宣告成二維陣列，一定會錯誤的