最后一条记录表示监考时间，如何 算出每位共教师监考时间

CLOSE DATABASES
USE jk IN 0
GO BOTTOM in jk
最后一行=RECNO()
CREATE CURSOR t1 (姓名 c(10),时间 n(10))
SELECT * FROM jk INTO CURSOR t2 WHERE RECNO()<>最后一行
SELECT * FROM jk INTO CURSOR t3 WHERE RECNO()=最后一行
FOR i=1 TO FCOUNT('t2')
    field_name=FIELD(i,'t2')
    INSERT INTO t1(姓名,时间) SELECT t2.&field_name.,t3.&field_name. FROM t2,t3 WHERE NOT EMPTY(t2.&field_name.)
ENDFOR
SELECT 姓名,SUM(时间) 时间 FROM t1 INTO CURSOR t4 GROUP BY 姓名
SELECT t4
BROWSE

学习一下

运行了全部时间为0

正确谢谢了我最后多了一行空白行

Close Databases 
Use Jk Alias Jk
Go Bottom 
Scatter To Asj && 将最后一条记录保存在数组变量中
Create Cursor Tjjg (姓名 C(8),累计时长 N(4))
Select Jk
For lnI=1 To Fcount()
    Insert Into Tjjg Select Evaluate(Field(lnI)),Val(Asj[lnI]) From Jk Where Not Empty(Evaluate(Field(lnI))) And Recno()<Reccount()
EndFor 
Select 姓名,Sum(累计时长) 累计时长 From Tjjg Group By 姓名 order by 1 Into Cursor 统计结果
Browse 

[ 本帖最后由 sdta 于 2014-11-11 19:53 编辑 ]

Select * From Jk Where Recno()=Reccount() Into Array Asj
Create Cursor Tjjg (姓名 C(8),累计时长 N(4))
Select * From Jk Where Recno()<Reccount() Into Cursor Temp
Select Temp
For lnI=1 To Fcount()
    Insert Into Tjjg Select Evaluate(Field(lnI)),Val(Asj[lnI]) From Jk Where Not Empty(Evaluate(Field(lnI))) And Recno()<Reccount()
EndFor 
Select 姓名,Sum(累计时长) 累计时长 From Tjjg Group By 姓名 order by 1 Into Cursor 统计结果
Browse 
Return 

学习了

学习啦，谢谢！