[求助]for循环报错 - 高级功能研发区 - 金字塔客服中心 - 专业程序化交易软件提供商

欢迎使用金字塔普通技术服务论坛，您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴，普通区问题处理速度慢，请耐心等待。谢谢您对我们的支持与理解。

金字塔客服中心 - 专业程序化交易软件提供商 → 金字塔软件 → 高级功能研发区 → [求助]for循环报错

共有4501人关注过本帖树形打印复制链接主题：[求助]for循环报错

RES00

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：新手上路帖子：35 积分：225 威望：0 精华：0 注册：2011/12/24 20:01:07

[求助]for循环报错 发帖心情

Post By：2012/1/4 15:19:35 [只看该作者]

先看代码：

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

next