通常我们使用以下的代码进行记录循环：
Dowhilenotrecords.eof
combo1.additemrecords![FullName]
records.movenext
loop

结果是每个循环中数据库都要进行一次数据结束测试。在大量的记录的情况下，浪费的时间相当大。而使用以下的代码，可以提高近1/3的速度：
records.movelast
intRecCount=records.RecordCount
records.movefirst

forintCounter=1tointRecCount
combo1.additemrecords![FullName]
records.movenext
nextintCounter->

文章整理：站长天空 网址：http://www.z6688.com/
以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息，谢谢!