VBGood网站全文搜索 Google

搜索VBGood全站网页(全文搜索)
首页 - 经验之谈 - 不用 EOF 以加快记录循环
发表评论(0)作者:, 平台:, 阅读:10844, 日期:2000-03-12
不用 EOF 以加快记录循环

通常我们使用以下的代码进行记录循环:


Do while not records.eof

combo1.additem records![Full Name]

records.movenext

loop


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


records.movelast

intRecCount=records.RecordCount

records.movefirst


for intCounter=1 to intRecCount

combo1.additem records![Full Name]

records.movenext

next intCounter