For...Next - III

Un truco para optimizar y acelerar la ejecución en un bucle de este tipo, consiste en utilizar como contador una variable de tipo Integer, en vez de una de tipo Short, Long, Decimal, etc. Esto es debido a que los tipos Integer se actualizan más rápidamente que los otros tipos numéricos, aunque la diferencia sólo será apreciable en bucles que ejecuten muchos miles de iteraciones y que contengan muchas instrucciones. Ver Código fuente 141.

Dim ContRapido As Integer

Dim ContLento As Decimal

' este bucle se ejecutará más rápido que el siguiente

For ContRapido = 1 To 10000

' código

Next

For ContLento = 1 To 10000

' código

Next

Código fuente 141