How do I exit a case statement?

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

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.

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

Code:

---

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!