Break out of a While ... Wend loop

Question

Tôi đang sử dụng Vòng lặp while ... Wend của VBA.

Dim count as Integer 

While True 
    count=count+1 

    If count = 10 Then 
     ''What should be the statement to break the While...Wend loop? 
     ''Break or Exit While not working 
    EndIf 
Wend 

Tôi không muốn sử dụng điều kiện như `Trong khi đếm < = 10 ... Wend

Answer 1

Một While/Wend chỉ có thể được thoát sớm với một GOTO hoặc bằng cách thoát khỏi một khối ngoài (Exit sub/function/another exitable loop)

Thay đổi thành Do loop intead;

Do While True 
    count = count + 1 

    If count = 10 Then 
     Exit Do 
    End If 
Loop 

(Hoặc cho Looping với một bộ incrementing kiểm soát biến)

for count = 1 to 10 
    msgbox count 
next