Para sa...Susunod na Pahayag

Inuulit ang mga pahayag sa pagitan ng Para sa...Susunod harangan ang isang tinukoy na bilang ng beses.

Syntax:

For counter=start To end [Step step]
    statement-block
    [Exit For]
    statement-block
Next [counter]

  For Each item In list
      statement-block
  [Exit For]
      statement-block
  Next [item]

Mga variable:

counter: Loop counter unang itinalaga ang halaga sa kanan ng katumbas na tanda ( simulan ). Ang mga numerong variable lamang ang may bisa. Ang loop counter ay tumataas o bumababa ayon sa variable hakbang hanggang wakas ay nakapasa.

simulan: Numeric variable na tumutukoy sa paunang halaga sa simula ng loop.

wakas: Numeric variable na tumutukoy sa huling halaga sa dulo ng loop.

hakbang: Itinatakda ang halaga kung saan tataas o babaan ang loop counter. Kung hakbang ay hindi tinukoy, ang loop counter ay dinadagdagan ng 1. Sa kasong ito, wakas dapat na mas malaki kaysa sa simulan . Kung gusto mong bawasan counter , wakas dapat mas mababa sa simulan , at hakbang dapat magtalaga ng negatibong halaga.

Ang Para sa...Susunod inuulit ng loop ang lahat ng mga pahayag sa loop para sa dami ng beses na tinukoy ng mga parameter.

Bilang ang counter nababawasan ang variable, sinusuri ng LibreOffice Basic kung ang wakas naabot na ang halaga. Sa sandaling ang counter pumasa sa wakas halaga, awtomatikong nagtatapos ang loop.

Posibleng pugad Para sa...Susunod mga pahayag. Kung hindi mo tinukoy ang isang variable na sumusunod sa Susunod pahayag, Susunod awtomatikong tumutukoy sa pinakabago Para sa pahayag.

Kung tumukoy ka ng pagtaas ng 0, ang mga pahayag sa pagitan Para sa at Susunod ay paulit-ulit na tuloy-tuloy.

Kapag binibilang ang counter variable, sinusuri ng LibreOffice Basic kung may overflow o underflow. Ang loop ay nagtatapos kapag counter lumampas wakas (positive Step value) o mas mababa sa wakas (negatibong halaga ng Hakbang).

Gamitin ang Lumabas Para sa pahayag na lumabas sa loop nang walang kondisyon. Ang pahayag na ito ay dapat nasa loob ng a Para sa...Susunod loop. Gamitin ang Kung...Kung gayon pahayag upang subukan ang kondisyon ng paglabas tulad ng sumusunod:

  For...
      statement-block
      If condition = True Then Exit For
      statement-block
  Next

Sa nested Para sa...Susunod mga loop, kung lalabas ka sa isang loop nang walang kondisyon Lumabas Para sa , isang loop lang ang lumabas.

Mga halimbawa

Ang sumusunod na halimbawa ay gumagamit ng dalawang nested na mga loop upang pagbukud-bukurin ang isang string array na may 10 elemento ( sEntry() ), na puno ng iba't ibang nilalaman:

Sub ExampleSort
Dim sEntry(9) As String
Dim iCount As Integer, iCount2 As Integer
Dim sTemp As String
    sEntry = Array("Jerry","Patty","Kurt","Thomas","Michael",_
                 "David","Cathy","Susie","Edward","Christine")
    For iCount = 0 To 9
        For iCount2 = iCount + 1 To 9
            If sEntry(iCount) > sEntry(iCount2) Then
                sTemp = sEntry(iCount)
                sEntry(iCount) = sEntry(iCount2)
                sEntry(iCount2) = sTemp
            End If
        Next iCount2
    Next iCount
    For iCount = 0 To 9
        Print sEntry(iCount)
    Next iCount
End Sub

Sinasaliksik nito ang nilalaman ng isang array upang ipakita ang bawat item na nilalaman nito.

  Sub list_iteration
      kubyertos = Array("tinidor", "kutsilyo", "kutsara")
      Para sa bawat item sa kubyertos
          I-print ang item
      Susunod na ' aytem
  End Sub