表aa，三个字段a1,a2a3，有100条记录，表bb有mm,b1,c1,b2,c2......b100,c100共201个字段，现要将表aa的100个记录中字段a1,a3作为一条记录放到表bb中，mm不需要填充，
b1应该是表aa第一条a1字段的值，c1应该是表aa第一条a3字段的值，
b2应该是表aa第二条a1字段的值，c2应该是表aa第二条a3字段的值，
.........

BB就一条记录，扫AA过去就是了

转到EXCEL中，转置就可以了。

** 3条记录示例
CREATE CURSOR aa (a1 I,a2 I,a3 I)
FOR i=1 TO 3
    INSERT INTO aa VALUES (i,2*i,3*i)
ENDFOR
CREATE CURSOR bb (mm I,b1 I,c1 I,b2 I,c2 I,b3 I,c3 I)
APPEND BLANK
SELECT aa
SCAN 
    REPLACE ("bb.b"+TRANSFORM(RECNO("aa"))) WITH aa.a1,;
            ("bb.c"+TRANSFORM(RECNO("aa"))) WITH aa.a3
ENDSCAN
SELECT * FROM bb

数组处理，2列转换为200列

[此贴子已经被作者于2021-3-16 09:45编辑过]

use aa in 0
COPY TO ARRAY a1a  FOR RECNO()<101
DIMENSION a1a[alen(a1a)*2]
use bb in 0
appe FROM ARRAY a1a fields like b*,c*

sdta老师，是这样吗？

为什么会这样？

use aa in 0
COPY TO ARRAY a1a FIELDS A1, A3 FOR RECNO()<101
DIMENSION a1a[1, alen(a1a)]
use bb in 0
appe FROM ARRAY a1a fields like b*,c*

[此贴子已经被作者于2021-3-16 10:30编辑过]

BB表中有B开头的字段名吗？应该是P吧？

还是不行