How to exit while loop with vba?

Method 1.

While expressions
 
 Wend

For example: 100 cycles

  While i <= 200
 i = i + 1
 
 If i = 100 Then GoTo 100
 
 Wend
100: 'Exit while

msgbox "Already exited while!"

 

Method 2.

i = 1
Do While i < 10000
  If i = 100 Then Exit Do
  i = i + 1
Loop
MsgBox i