How do I exit a case statement?

[Spawny]

Hi,
How do I get out of a case statement after a function has found a problem. What I mean is:

Code:

Select case index

Case 0

functionperformed
if x = y then
form.show vbmodal
endif

Case 1

unload me

end select

where functionperformed = the function that is performed

Now. What I want to do is exit the case statement after the function has been completed. In other words, how do i exit out of Case 0 when the function has created a problem and it needs to exit from the case index and revert back to the form originally loaded? Any help is appreciated and thanks in advance.

Mike

[kedaman]

No way to exit a case
solution 1. use a goto, to a label after the end select
solution 2. use an if then inside the case and put the rest in else.

[JMuller]

Let the function return a boolean value. If the function finds a problem, return False; else return True. Then, you can use it as:

Select Case index 
   Case 0 
      If functionperformed Then
         If x = y Then
            Form.Show vbModal 
         End If 
      End If
   Case 1 
      Unload Me 
End Select

Hope it works!