在数据库中不用eof以加快记录循环_visualbasic教程

通常我们使用以下的代码进行记录循环：
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->