跳过循环中的值然后继续循环？

Question

我需要能够从0开始运行循环，让它识别某个值（在本例中为piecenumblack），然后跳过该值，然后继续循环直到它达到11.我真的不确定是什么要使用的循环类型，我在Do，While或For循环中没有成功。

  Dim piecenumblack As Integer
            For i = 0 To piecenumblack


            Next
            For i = 11 To piecenumblack Step -1

            Next

Answer 1

你可以在循环内部添加一个If：

  Dim piecenumblack As Integer
  piecenumblack = 3
  For i = 0 To 11
      If i <> piecenumblack then
         'Do Code
      End If
  Next

这将在i = 3时跳过执行任何代码，然后继续使用4,5,6..11。