. PERULANGAN
Dalam pemrograman ada kalanya kita memerlukan perulangan untuk melakukan suatu perintah yang sama untuk beberapa kali. Pada visual basic terdapat beberapa macam struktur kondisi perulangan, diantaranya adalah Do … Loop dan For … Next. Untuk lebih jelasnya berikut adalah macam – macam bentuk perulangan dalam visual basic :
- 1. Do While … Loop
Do While Kondisi
Pernyataan
…..
Loop
Sintaks di atas adalah bentuk Do While dimana kondisi akhir perulangan terletak di awal sedangkan bentuk Do While yang letak kondisi akhirnya di akhir adalah sebagai berikut :
Do
Pernyataan
……
Loop While Kondisi
- 2. Do Until … Loop
Do Until Kondisi
Pernyataan
…..
Loop
Perulangan Do Until juga memiliki bentuk sintaks yang lain dimana kondisi diletakkan di akhir pernyataan perulangan. Bentuk sintaksnya adalah sebagai berikut :
Do
Pernyataan
……
Loop Until Kondisi
- 3. While … Wend
While Ekspresi
Pernyataan
…..
Wend
- 4. For … Next
Perulangan For … Next digunakan untuk melakukan perulangan dengan jumlah tertentu yang kita kehendaki. Kita harus mendeklarasikan sebuah variabel yang akan digunakan sebagai indeks untuk perulangan. Sintaks perulangan For … Next adalah :
For Indeks = NilaiAwal To NilaiAkhir
Pernyataan
…..
Next Indeks
- 5. PERCABANGAN
1. If…Then
Percabangan dengan menggunakan If … Then digunakan untuk memilih dua kondisi atau lebih dengan memeriksa syarat pada tiap kondisi, jika syarat pada kondisi 1 benar ( True ) maka maka program akan menjalankan pernyataan 1 jika tidak ( False ) maka program akan memeriksa kondisi 2, jika syarat pada kondisi 2 benar ( True ) maka program akan menjalankan pernyataan 2 jika tidak ( False ) maka program akan memeriksa kondisi berikutnya dan begitu seterusnya hingga kondisi terakhir pada percabangan.
If Kondisi1 Then
Pernyataan1 …………
ElseIf Kondisi2 Then
Pernyataan2 ………..
Else
Pernyataan3 …………
End if
Contoh programnya :
Dim Suhu Sebagai Double
...
If => Suhu Then
Debug. Print "Ini sangat panas"
Elseif 30,0 <= Suhu Dan <Suhu = 39,0 Then
Debug. Print "Panas"
Elseif 20,0 <= Suhu Dan <Suhu = 29,0 Then
Debug. Print "Ini hangat"
Elseif 10,0 <= Suhu Dan <suhu = 19,0 Then
Debug. Print "It's cool"
Elseif 0.0 <= Suhu Dan <Suhu = 9,0 Then
Debug. Print "Dingin"
Else
Debug. Print "Dingin"
End If
2. Select Case
Dibandingkan dengan percabangan If … Then, Select Case lebih mudah dibaca dan di debug serta lebih mudah digunakan dalam alur program yang membutuhkan banyak percabangan.
Bentuk umum perabangan select case adalah sebagai berikut :
Select Case Pilihan
Case 1 Pernyataan1 …..
Case 2 Pernyataan2 …..
Case 3 Pernyataan3 ……
End Select
Contoh program dengan menggunakan Select Case :
Pilih Kasus Suhu
Case Apakah> = 40 #
Debug. Print "Ini sangat panas"
Case 30 # Untuk 39 #
Debug. Print "Panas"
Case 20 # Untuk 29 #
Debug. Print "Ini hangat"
Case 10 # Untuk 19 #
Debug. Print "It's cool"
Case 0 # Untuk 9 #
Debug. Print "Dingin"
Case Else
Debug. Print "Dingin"
End Select