set talk offdime a(7)use xsdas=0for i=3 to 5scatter to as=s+

兼ew爱2022-10-04 11:39:541条回答

set talk off
dime a(7)
use xsda
s=0
for i=3 to 5
scatter to a
s=s+a(7)
skip
endfor
"s="+str(s)
return

已提交,审核后显示!提交回复

共1条回复
ctyki 共回答了17个问题 | 采纳率100%
set talk off
dime a(7) &&定义一个一维数组,此数组有7行数据组成
use xsda
s=0
for i=3 to 5 &&这里只够明白是三次循环,似乎I没有什么意义
scatter to a &&从当前记录中复制数据到一个数组,因为此行命令了省略 了FIELDS FieldNameList ,所以将从所有字段中复制值,即将当前记录的值依次赋给a(1),a(2),……,a(7).
s=s+a(7) &&进行累加,但此a(7)指的是数组a的第7行数据,由上行命令中赋值,其值由表XSDA的第7个字段的值
skip
endfor
"s="+str(s)
return
1年前

相关推荐