某冒泡排序算法的VB程序段如下：

i=6: flag =1: cnt=0

Do While i >=2 And flag=1

  flag=0: cnt= cnt +1

For j =

  If a(j)>a(j-1)Then

    k=a(j):a(j)=a(j-1):a(j-1)=k

     flag= 1

  End If

Next j

   i=i-1

Loop

数组元素a(1)到a(6)的值依次为“79，13，93，55，29，17”，执行该程序段后，cnt的值为3，数组元素实现有序，则方框中的代码是（  ）

A、2 To i-1

B、2 To i

C、6 To 7-i Step-1

D、6 To 8-i Step -1