if xx=1 then for j=1 to ccouns 这句语法有错吗？

guolucky2003 2003-12-09 05:39:21

if xx=1 then
for j=1 to ccouns
else
for j=jcouns to cs
end if
crcs(j)=crs("出货日期")
cdjs(j)=crs("单价")
csls(j)=crs("数量")
cjes(j)=crs("金额")
crs.movenext
next

请问这段代码错在哪里呢？
总提示缺小'next'在else行就出错了。点解呢？

...全文

39 4 打赏收藏转发到动态举报

写回复

用AI写文章

4 条回复

切换为时间正序

请发表友善的回复…

发表回复

qxs 2003-12-09

打赏
举报

你写循环结构写错了，不能这样写，
if xx=1 then
for j=1 to ccouns
crcs(j)=crs("出货日期")
cdjs(j)=crs("单价")
csls(j)=crs("数量")
cjes(j)=crs("金额")
crs.movenext
next

else
for j=jcouns to cs
crcs(j)=crs("出货日期")
cdjs(j)=crs("单价")
csls(j)=crs("数量")
cjes(j)=crs("金额")
crs.movenext
next
end if

liuvb 2003-12-09

打赏
举报

你的结构全乱了。
同意 jacklinchen(陈)

jacklinchen 2003-12-09

打赏
举报

这当然错了。 if中的for没有结束。

if xx=1 then
for j=1 to ccouns
crcs(j)=crs("出货日期")
cdjs(j)=crs("单价")
csls(j)=crs("数量")
cjes(j)=crs("金额")
crs.movenext
next

else
for j=jcouns to cs
crcs(j)=crs("出货日期")
cdjs(j)=crs("单价")
csls(j)=crs("数量")
cjes(j)=crs("金额")
crs.movenext
next

end if

lious 2003-12-09