哦,这样解释就完全明白了,哈哈。3Q
再一个问题,我要由交叉表(EXCEL格式)还原到VFP的2元表,也就是由
学号 语文 数学
学号 课程 成绩
1 80 90 1
语文
80
2 70 50
→
1
数学 90
3 60 75
2
语文
70
2
数学
50
3 语文
60
3
数学 75
为这个问题我从昨天中午一直弄到现在,最后的结果是利用程序:
程序代码:
SELECT C06,C01,C03,C07,C04,C05,C02,C09,C08,C51,C52 FROM cjb20.dbf INTO ARRAY TEMP
R=272 &&代表行数
C=11 &&代表列数
LOCAL NewTemp(R*C)
i=1
j=1
FOR n=1 TO R*C
IF i<=R
IF j<=C
NewTemp(n)=Temp(i,j)
ELSE
i=i+1
j=1
NewTemp(n)=Temp(i,j)
ENDIF
j=j+1
ENDIF
ENDFOR
USE h:\VFP\DATA\TABLES\cjk.dbf
SELECT cjk
FOR k=1 TO R*C
GO BOTTOM
APPEND BLANK
REPLACE cj WITH NewTemp(k)
IF EOF()
EXIT
ENDIF
SKIP
ENDFOR
BROWSE
先将所有的成绩排成一列,然后再用一个类似程序将学号和课程排成一列,方法很笨,效率也不高,不知道有没有好的方法?
[
本帖最后由 lyxc34 于 2011-7-9 17:08 编辑 ]