我做了张表1，有五个数值型字段A，B，C，D，E，六条记录：
A B C D E
3 5 5 5 6
3 5 6 6 6
5 6 5 6 7
6 7 7 6 7
6 8 9 0 2
6 7 6 6 7
又做了个程序：
clea
use 1
copy to arra x
dime k(6,5)
for i=1to 6
for j=1to 5
k(i,j)=mod(x(i,j),3)
endf
endf
do case
s=k(1,2)+k(1,4)
case s=4
a=3
case s=3
a=2
endc
?a
retu
执行程序时,却出现"找不到变量S"的提示,望各位前辈指点这个程序应该怎么做,小弟先谢了.