没有工作但没有工作（没有if / else / endif存在）

Question

我无法使用While / Wend循环。即使是最微小的情况，例如下面的内容：

Sub TestingWhile()

Dim i As Integer

i = 0
Do While i < 10
   i = i + 1
Wend

End Sub

该代码的结果是一个错误消息窗口，上面写着＆＃34;编译错误：没有使用We＆＃34 ;.

我发现人们有这个错误，但只是因为他们总是有一些错误的if / else语句。显然事实并非如此。发生了什么事？

顺便说一句，我在Excel 2013中使用Microsoft Visual Basic for Applications 7.1。

编辑 - 问题解决了。语法，初学者错误：Do While由Loop关闭，While由Wend关闭

Answer 1

Do While已由Loop关闭，While已由Wend关闭：

Sub TestingWhile()

Dim i As Integer

i = 0
Do While i < 10
   i = i + 1
Loop

End Sub