Exit Statement

একটি Do...Loop, For...Next, একটি ফাংশন, অথবা একটি সাবরুটিন হতে প্রস্থান করে।

সিনট্যাক্স:


প্যারামিটার দেখুন

প্যারামিটার:

Exit Do

লুপ থেকে প্রস্থান করার জন্য শুধুমাত্র Do...Loop স্টেটমেন্টের মধ্যে উপস্থিত থাকা বৈধ। প্রোগ্রাম চালনা স্টেমেন্টের সাথে বহাল থাকে যা লুপ স্টেটমেন্ট অনুসরণ করে থাকে। Do...Loop স্টেটমেন্টটি একত্রিত থাকে, তাহলে কন্ট্রোলটি পরবর্তী উচ্চতর স্তরের লুপে স্থানান্তরিত হয়ে থাকে।

Exit For

লুপ থেকে প্রস্থান করার জন্য শুধুমাত্র For...Next লুপের মধ্যে বৈধ। প্রোগ্রাম চালনা প্রথম স্টেটমেন্ট দ্বারা বহাল থাকে যা Next স্টেটমেন্টটি অনুসরণ করে থাকে। নেস্টেড স্টেটমেন্টের মধ্যে, কন্ট্রোলটি পরবর্তী উচ্চতর স্থরের লুপে স্থানান্তরিত হয়।

Exit Function

অবিলম্বে ফাংশন প্রসিজার থেকে প্রস্থান করে থাকে। প্রোগ্রাম চালনা নিচের স্টেটমেন্টের সাহায্যে বহাল থাকে যা ফাংশন কল অনুবর্তী।

Exit Sub

অবিলম্বে সাবরুটিন থেকে প্রস্থান করে থাকে। প্রোগ্রাম চালনা স্টেটমেন্ট সহ বহাল থাকে যা সাব কল অনুবর্তী।

নোট আইকন

Exit স্টেটমেন্টটি কাঠামোর শেষ নির্ধারণ করে না, এবং অবশ্যই End স্টেটমেন্ট এর সাথে গুলিয়ে ফেলা যাবে না।


উদাহরণ:


Sub ExampleExit
Dim sReturn As String
Dim sListArray(10) As String
Dim siStep As Single
    For siStep = 0 to 10 REM Fill array with test data
        sListArray(siStep) = chr(siStep + 65)
        MsgBox sListArray(siStep)
    Next siStep
    sReturn = LinSearch(sListArray(), "B")
    Print sReturn
End Sub
 
Function LinSearch( sList(), sItem As String ) As Integer
Dim iCount As Integer
REM LinSearch searches a TextArray:sList() for a TextEntry:
REM ভুক্তির ইনডেক্স অথবা ০ (নাল) প্রদান করে
    For iCount=1 To Ubound( sList() )
        If sList( iCount ) = sItem Then
            Exit for REM sItem found
        End If
    Next iCount
    If iCount = Ubound( sList() ) Then iCount = 0
    LinSearch = iCount
End Function

Please support us!