Cara Looping Dengan GoTo (Tanpa For..Next/Do..Loop) VB6/VBNET


Terkadang anda akan menemukan sebuah kasus yang mengharuskan looping secara logika bukan secara sintak, salah satu caranya adalah dengan mengunakan fungsi GoTo, Contoh :

‘Looping dengan menggunakan GoTo
Dim nilai As Integer = 1
Looping_Lagi:
If nilai <= 100 Then
ListBox1.Items.Add(nilai)
nilai = nilai + 1
GoTo Looping_Lagi
End If

'Sintak Diatas Sama Dengan Anda menulis For..Next/Do..Loop
For i As Integer = 1 To 100
ListBox1.Items.Add(nilai)
Next

Contoh diatas hanya contoh kecil, sebenarnya fungsi GoTo ini nantinya dapat anda gunakan untuk mengatasi
kasus lain yang jauh lebih rumit dan besar yang tidak dapat ditangani lagi oleh looping biasa seperti
For..Next /Do..Loop atau bahkan mungkin mengharuskan anda menggunakan GoTo didalam For..Next/Do..Loop. Contoh dibawah ini adalah kasus yang cukup rumit dan mungkin terjadi :

Cek_Kondisi_Kagi:
'…. sintak anda untuk cek kondisi 1

If "…." Then GoTo Langsung_Lolos 'Loncat Ke paling Bawah

If "……" Then
'……sintak anda
GoTo Eksekusi_Kodisi 'Loncat Ke Bawah
Else
'…….sintak anda
GoTo Cek_Kondisi_Kagi 'Loncat ke Atas / Looping lagi
End If

Eksekusi_Kodisi:
'……Sintak untuk Eksekusi Kodisi

Langsung_Lolos:
'…..Sintak Jika Lolos Final

Contoh kondisi yang saya tulis diatas, pernah saya alami waktu membuat sebuah aplikasi di kantor saya, semoga dapat bermanfaat untuk anda semua.

Tinggalkan Balasan

Isikan data di bawah atau klik salah satu ikon untuk log in:

Logo WordPress.com

You are commenting using your WordPress.com account. Logout / Ubah )

Gambar Twitter

You are commenting using your Twitter account. Logout / Ubah )

Foto Facebook

You are commenting using your Facebook account. Logout / Ubah )

Foto Google+

You are commenting using your Google+ account. Logout / Ubah )

Connecting to %s

Zoemalang's community

ujung malang adalah Sebuah desa yang hilang terganti dengan ujung harapan

YoYo Games Blog Feed

Ujung malang adalah Sebuah desa yang hilang terganti dengan ujung harapan

Dealer Termurah

Menjual Segala Jenis Motor Baru Di Indonesia Cash Maupun Kredit

%d blogger menyukai ini: