Bagikan melalui

Pernyataan Lanjutkan (Visual Basic)

Mentransfer kontrol segera ke perulangan berikutnya dari perulangan.

Sintaksis

Continue { Do | For | While }

Komentar

Anda dapat mentransfer dari dalam Do, , Foratau While perulangan ke perulangan berikutnya dari perulangan tersebut. Kontrol langsung lolos ke pengujian kondisi perulangan, yang setara dengan mentransfer ke For pernyataan atau While , atau ke Do pernyataan atau Loop yang berisi Until klausa atau While .

Anda dapat menggunakan Continue di lokasi mana pun dalam perulangan yang memungkinkan transfer. Aturan yang memungkinkan transfer kontrol sama dengan Pernyataan GoTo.

Misalnya, jika perulangan benar-benar terkandung dalam Try blok, Catch blok, atau Finally blok, Anda dapat menggunakan Continue untuk mentransfer keluar dari perulangan. Jika, di sisi lain, Trystruktur ...End Try terkandung dalam perulangan, Anda tidak dapat menggunakan Continue untuk mentransfer kontrol keluar dari Finally blok, dan Anda dapat menggunakannya untuk mentransfer keluar dari Try blok atau Catch hanya jika Anda mentransfer sepenuhnya keluar dari TryEnd Try ... struktur.

Jika Anda memiliki perulangan berlapis dengan jenis yang sama, misalnya perulangan Do dalam perulangan lain Do , Continue Do pernyataan melompat ke perulangan terdahulu Do berikutnya yang berisinya. Anda tidak dapat menggunakan Continue untuk melompat ke iterasi berikutnya dari perulangan yang berisi jenis yang sama.

Jika Anda memiliki perulangan berlapis dari berbagai jenis, misalnya perulangan Do dalam perulangan For , Anda dapat melompat ke iterasi berikutnya dari perulangan dengan menggunakan atau Continue DoContinue For.

Contoh

Contoh kode berikut menggunakan Continue While pernyataan untuk melompat ke kolom array berikutnya jika pembagi adalah nol. Ada Continue While di dalam perulangan For . Ini mentransfer ke While col < lastcol pernyataan, yang merupakan iterasi berikutnya dari perulangan terdahulu While yang berisi perulangan For .

Dim row, col As Integer
Dim lastrow As Integer = 6
Dim lastcol As Integer = 10
Dim a(,) As Double = New Double(lastrow, lastcol) {}
Dim b(7) As Double
row = -1
While row < lastrow
    row += 1
    col = -1
    While col < lastcol
        col += 1
        a(row, col) = 0
        For i As Integer = 0 To b.GetUpperBound(0)
            If b(i) = col Then
                Continue While
            Else
                a(row, col) += (row + b(i)) / (col - b(i))
            End If
        Next i
    End While
End While

Lihat juga

  • Last updated on