BREAK
Leaves a loop immediately.
PUBLIC SUB Button1_Click() DIM X AS Integer FOR X = 1 TO 1000 IF X = 200 THEN BREAK PRINT X NEXT END