以下是引用kesc在2017-9-13 17:26:16的发言:
是用N作字段名,没错
是用N作字段名,没错
最好不是用N作字段名,你把字段改成别的名称试试吧,
程序代码:Clear
Set Safety Off
Set Talk Off
If !File([Test.dbf])
Create Table Test(C C(1),N N(7,0))
Index On C Tag C
For m.i = 1 To 7000000
Insert Into Test(C, N) Value([A], m.i)
Endfor
Use
Endif
Use Test Order C
Set Order To
m.lnStar = Seconds()
Total To TestResult Fields N On C For C = [A]
? [耗时:] + Alltrim(Str(Seconds() - m.lnStar, 5, 3)) + [秒]
m.lnStar = Seconds()
Calculate Sum(N) to m.lnSum For C = [A]
? [耗时:] + Alltrim(Str(Seconds() - m.lnStar, 5, 3)) + [秒]
? m.lnSum
Use
?
Use Test Order C
m.lnStar = Seconds()
Total To TestResult Fields N On C For C = [A]
? [耗时:] + Alltrim(Str(Seconds() - m.lnStar, 5, 3)) + [秒]
m.lnStar = Seconds()
Calculate Sum(N) to m.lnSum For C = [A]
? [耗时:] + Alltrim(Str(Seconds() - m.lnStar, 5, 3)) + [秒]
? m.lnSum
Use[此贴子已经被作者于2017-9-15 11:47编辑过]
