Работа с таймером - VB

Формулировка задачи:

Доброго времени суток. У меня такой вопрос, как можно остановить работу цикла на пару секунд. Сказали таймер можно использовать, но я пока не пойму как.

  For j = 10 To i + 1 Step -1
                If w(i) < w(j) Then
                    k = w(i)
                    w(i) = w(j)
                    w(j) = k
                    For q = 1 To 10
                    Picture5.Print w(q);
                    Next q
                    Picture5.Print crt
                    End If
            Next j

это мой массив, нужно останавливать, когда меняется J.

Решение задачи: «Работа с таймером»

textual
                            Листинг программы 
                        

                            ' Делаем паузу на две
 'секунды между двумя сообщениями
MsgBox "Делаем паузу"
Sleep 2000  ' 2000 миллисекунд = 2 секунды паузы
MsgBox "Получилось?"
                        