private sub form_activate
dim score(3)as integer, total as integer
dim aa_score as variant
score(1)=50:score(2)=14:score(3)=36
total=0:i=0
for each aa_score in score
i=i+1
total=total+aa_score
print i,aa_score,total
next
end sub
运行结果是1 0 0
          2 50 50
          3 14 64
          4 36 100我不太理解请帮我解释一下好吗各位高手