不用 EOF 以加快记录循环(vb)转贴
日期：2014-04-27 浏览次数：20535 次
通常我们使用以下的代码进行记录循环：
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
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
免责声明： 本文仅代表作者个人观点，与爱易网无关。其原创性以及文中陈述文字和内容未经本站证实，对本文以及其中全部或者部分内容、文字的真实性、完整性、及时性本站不作任何保证或承诺，请读者仅作参考，并请自行核实相关内容。
