[求助]for循環報錯 [金字塔]
- 咨詢內容:
先看代碼:
private Sub GetNewPrice()
i=600
for j=2 to i+1
ss1(j)=tt(j-2)
ss2(j)=tt(j-2)
ss3(j)=ss2(j)-ss2(j-1)
if ss1(j)>ss1(j-1) then
ss4(j)=ss2(j)
else if ss1(j)<ss1(j-1) then
ss4(j)=0
else if ss1(j,3)=ss1(j-1,3) then
for k=j to 2 step -1
if ss1(k-1)>ss1(k-2) then
ss4(j)=ss2(j)
end if
next
end if
nextEnd Sub
這段代碼有什么地方不對嗎?系統總是報錯next,不知道為什么,請教版主和高手,謝謝!
- 金字塔客服:
不知道你有沒有聲明定義數組,代碼不全不能調試。
- 用戶回復:
SS1,2,3,4和tt1,2都是數組,但是系統不是說過不用聲明的嗎?第一次用的時候系統就會自動聲明
另外我的主要目的是要實現在SS1數組第N個數大于第N-1個數時,把SS3的第N個數賦值給SS4的第N個數,
小于時把SS3的第N個數的復數賦值給SS4的第N個數,
等于時,則看前面遇到的第一個不相等情況發生時是大于還是小于,然后決定SS3的第N個數的復數賦值給SS4的第N個數的正負
相關文章
-
沒有相關內容