VB编程问题

Private Sub Command1_Click() For i = 100 To 200 If i Mod 3 > 0 Then k = k + 1 Print i; If k Mod 6 = 0 Then Print End If Next i Print End Sub