我创建了一个包含产品名称列表的数组。我想显示列表。当以下运行时,它只显示数组中的最后一个条目,而不是数组中的项目列表。
whileprintingrecords;
Shared stringvar array premium;
numbervar x := 1;
stringvar showit;
for x := 1 to 5 do
(
showit := premium[x];
x := x+1;
);
showit;
如果我将最后一行移到()中,那么我会得到True作为响应。
答案 0 :(得分:0)
你在每个for循环中“覆盖”变量showit,因此premium [5]将是分配给showit的最后一个值(首先,showit是premium [1],然后是premium [2]等等)
答案 1 :(得分:0)
要在新行上显示数组中的迭代,最终解决方案使用Join函数。更简单的编码。
whileprintingrecords;
Shared stringvar array premium;
join(premium, ChrW(13));