خروج از حلقه تکرار

[armv6 0]

سلام دوستان من میخوام از حلقه تکرار دوم خارج بشم و وارد حلقه اول بشم چطوری خارج بشم دستور exit عمل نمیکنه...البته وارد خط exit میشه ولی عمل نمیکنه.

کد من:

dim lenght as int=2
dim strLine(lenght) as string
dim S1 as string="1395/01/24;12!14!35;d;8450" & CRLF

For i=0 To Lenght-1
                        For j=0 To S1.Length -1
 
                If  S1.CharAt(j) <> CRLF Then
      strLine(i)=strLine(i) & S1.CharAt (j)
    
                              Else
      
                 Exit
    End If
  Next
Next

چرا از حلقه خارج نمیشه؟ بازهم تاکید میکنم که بنده تریسکردم و برنامه کاملا به قسمت else میفته و exit رو اجرا میکنه ولی خارج نمیشه از حلقه. چکار میشه کرد؟

[مجید آرتا 5,875]

سلام

شما از Return  استفاده کنید ببینید درست میشه

Exit  باید کار کنه   

[armv6 0]

return رو زدم برگشت به تابع قبلی که از اون تابع خودمو فراخوانی کرده بودم...چیکار میشه کرد؟