将文件xlrecno.txt内容保存到二维数组a(8,31)中，规则：
a(1,1)=11.....a(1,31)=131
a(2,1)=21.....a(2,31)=231
.
.
a(8,1)=81......a(8,31）=831

PUBLIC array aa(8),bb(8,31)
a1=Filetostr("xlrecno.txt")
ALINES(aa,a1,4,CHR(13),CHR(10))
FOR i=1 TO 8
    bb(i,1)=SUBSTR(aa(i),1,AT(",",aa(i),1)-1)
    FOR j=2 to 31
        bb(i,j)=SUBSTR(aa(i),AT(",",aa(i),j-1)+1,(AT(",",aa(i),j)-AT(",",aa(i),j-1))-1)
    ENDFOR
endfor
这种办法是不是太笨了！

[此贴子已经被作者于2019-5-23 09:23编辑过]

CREATE CURSOR tt (a1 I,a2 I,a3 I,a4 I,a5 I,a6 I,a7 I,a8 I,a9 I,a10 I,;
    a11 I,a12 I,a13 I,a14 I,a15 I,a16 I,a17 I,a18 I,a19 I,a20 I,;
    a21 I,a22 I,a23 I,a24 I,a25 I,a26 I,a27 I,a28 I,a29 I,a30 I,a31 I)
APPEND FROM xlrecno.txt DELIMITED
**BROWSE
COPY TO ARRAY arr
DISPLAY MEMORY LIKE arr

对vfp来说，一个表，或者一个cursor，岂不就是一个最好的二维数组？
能排序，能查询，能查找，还有哪家的二维数组能比vfp的一个表，或者一个cursor更好用？

谢谢！