如何退出循环?

在出现错误的时候,或者达到某一个条件的时候,我希望退出整个程序,而不仅仅是退出这个子程序
比如: call sub condition1
         call sub condition2
         call sub condition3
现在在语句1的时候,出现错误,或者达到子程序中设置的某一个条件,我希望退出整个程序,这个时候,如果在sub condition1里面使用if ..... then exit sub, 这个时候,只能退出condition1这个子程序,然后继续招待2,3, 请教如何退出整个程序? 谢谢了!