■ 処理時間をミリ秒単位で計測する
コードの記述の違いによって処理時間にどのくらいの差が発生するかを知ることは、高速化を行うためには重要です
API を使用することにより、処理時間をミリ秒単位で計測できます
Private Declare Function timeGetTime Lib "winmm.dll" () As Long

Private Sub 処理時間の計測()

    Dim i_time As Long

    i_time = timeGetTime()

    '' 処理

    MsgBox Format$(timeGetTime - i_time) & " ミリ秒"

End Sub