有百位和十位未知的5位整数“22**6，能被37或67整除。以下VB程序段的功能是：在满足条件的所有数中，将最大一个5位数的百位和十位依次显示在文本框Text1中。
i=100：flag=False
Do While i>0 And Not flag
Loop
Text1. Text = Str（i\10）+Str（i Mod 10）
方框中的代码由以下三部分组成：
①j=22006+i*10 ②i=i-1 ③If（j Mod 37）*（J Mod 67）=0 Then flag = True
下列选项中，代码顺序正确的是（ ）