asslamualaikum wr.wb
dalam blog ini saya akan menjelaskan tentang alur perjabangan pada visual basic 6.
Percabangan adalah metode yang ada pada semua bahasa pemrograman yang mengijinkan user untuk memilih dan mengeksekusi blok kode dan mengabaikan blok kode yang lain. Sedangkan Perulangan adalah metode yang terdapat pada semua bahasa pemrograman yang mengijinkan kita untuk mengeksekusi blok code berulang-ulang dalam kurun nilai tertentu.
Macam-macam bentuk percabangan pada Visual Basic 6 :
1. If ....Then
Digunakan untuk memilih dua kondisi atau lebih dengan memeriksa syarat pada tiap kondisi, jika syarat pada kondisi 1 bernilai benar ( True ) maka program akan menjalankan pernyataan 1, jika kondisi 1 bernilai salah ( False ) maka program akan memeriksa kondisi 2, jika syarat pada kondisi 2 benar ( True ) maka program akan menjalankan pernyataan 2 jika kondisi 2 benilai salah ( False ) maka program akan memeriksa kondisi berikutnya dan seterusnya hingga kondisi terakhir pada percabangan.
Bentuk Umum :
If Kondisi1 Then
Statement1
ElseIf Kondisi2 Then
Statement2
Else
Statement3
End if
2.Select Case
Kegunaannya sama dengan bentuk If....Then namun Select Case digunakan dalam alur program yang membutuhkan banyak percabangan.
Bentuk Umum :
Select Case Pilihan
Case 1 Statement1 …
Case 2 Statement2 …
Case 3 Statement3 …
End Select
Macam-macam bentuk perulangan :
1. Do While … Loop
Kata while dalam pernyataan Do While merintahkan program untuk melakukan perulangan apabila kondisi persyaratan masih bernilai True. Apabila kondisi persyaratan bernilai False maka program akan keluar dari perulangan dan berpindah ke kode program berikutnya. Bentuk umum :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 sbb :
Do
Statement
……
Loop While Kondisi
2. Do Until … Loop
Pada dasarnya, perulangan DO Until adalah sama dengan perulangan DO While. Yang membedakannya adalah pada perulangan Do While perulangan akan terus berjalan selama kondisi bernilai True dan akan berhenti jika kondisi bernilai False sedangkan pada perulangan Do Until perulangan akan terus berjalan apabila kondisi bernilai salah dan akan brhenti jika kondisi bernilai True.
Bentuk Umum :
Do Until Kondisi
Pernyataan
…
Loop
Perulangan Do Until juga memiliki bentuk sintaks yang lain dimana kondisi diletakkan di akhir pernyataan perulangan. Bentuk sintaksnya adalah sbb :
Do
Pernyataan
……
Loop Until Kondisi
3. While … Wend
Perulangan While … Wend digunakan saat kita ingin pernyataan pada program dijalankan selama kondisi ekspresi yang di tetapkan masih bernilai True.
Bentuk Umum :
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.
Bentuk Umum :
For Indeks = NilaiAwal To NilaiAkhir
Pernyataan
…..
Next Indeks
Contoh Programnya pada Visual Basic 6 :
1.Buat Form seperti pada gambar berikut
2. 2X klik pada dimana saja pada form untuk membuka code editor dan tuliskan code :
Private Sub Form_Load()
Combo1.AddItem ("A")
Combo1.AddItem ("B")
Combo1.AddItem ("C")
End Sub
3. 2X klik pada command button "Hitung" untuk membuka code editor
Private Sub Command1_Click()
Dim upah As Long
jk = Text2.Text
If Text1.Text = "" Or Text2.Text = "" Or Combo1.Text = "" Then
MsgBox "data belum lengkap", vbCritical, "error"
Exit Sub
End If
If Not IsNumeric(Text2.Text) Then
MsgBox " Jam kerja harus angka", vbCritical, "error"
Else
Label5.Caption = Text1.Text
Label6.Caption = Combo1.Text
Label7.Caption = Text2.Text
Select Case Combo1.Text
Case "A"
If jk < 48 Then
upah = jk * 2000
Else
upah = Val(48) * 2000 + (jk - 48) * 2000
End If
Label8.Caption = upah
Case "B"
If jk < 48 Then
upah = jk * 3000
Else
upah = Val(48) * 3000 + (jk - 48) * 2000
End If
Label8.Caption = upah
Case "C"
If jk < 48 Then
upah = jk * 4000
Else
upah = Val(48) * 4000 + (jk - 48) * 2000
End If
Label8.Caption = upah
End Select
End If
End Sub
4. 2X Klik pada tombol "Exit: untuk membuka jendela code editor
Private Sub Command2_Click()
End
End Sub
Percabangan dan Perulangan pada Visual Basic
Percabangan adalah metode yang ada pada semua bahasa pemrograman yang mengijinkan user untuk memilih dan mengeksekusi blok kode dan mengabaikan blok kode yang lain. Sedangkan Perulangan adalah metode yang terdapat pada semua bahasa pemrograman yang mengijinkan kita untuk mengeksekusi blok code berulang-ulang dalam kurun nilai tertentu.
Macam-macam bentuk percabangan pada Visual Basic 6 :
1. If ....Then
Digunakan untuk memilih dua kondisi atau lebih dengan memeriksa syarat pada tiap kondisi, jika syarat pada kondisi 1 bernilai benar ( True ) maka program akan menjalankan pernyataan 1, jika kondisi 1 bernilai salah ( False ) maka program akan memeriksa kondisi 2, jika syarat pada kondisi 2 benar ( True ) maka program akan menjalankan pernyataan 2 jika kondisi 2 benilai salah ( False ) maka program akan memeriksa kondisi berikutnya dan seterusnya hingga kondisi terakhir pada percabangan.
Bentuk Umum :
If Kondisi1 Then
Statement1
ElseIf Kondisi2 Then
Statement2
Else
Statement3
End if
2.Select Case
Kegunaannya sama dengan bentuk If....Then namun Select Case digunakan dalam alur program yang membutuhkan banyak percabangan.
Bentuk Umum :
Select Case Pilihan
Case 1 Statement1 …
Case 2 Statement2 …
Case 3 Statement3 …
End Select
Macam-macam bentuk perulangan :
1. Do While … Loop
Kata while dalam pernyataan Do While merintahkan program untuk melakukan perulangan apabila kondisi persyaratan masih bernilai True. Apabila kondisi persyaratan bernilai False maka program akan keluar dari perulangan dan berpindah ke kode program berikutnya. Bentuk umum :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 sbb :
Do
Statement
……
Loop While Kondisi
2. Do Until … Loop
Pada dasarnya, perulangan DO Until adalah sama dengan perulangan DO While. Yang membedakannya adalah pada perulangan Do While perulangan akan terus berjalan selama kondisi bernilai True dan akan berhenti jika kondisi bernilai False sedangkan pada perulangan Do Until perulangan akan terus berjalan apabila kondisi bernilai salah dan akan brhenti jika kondisi bernilai True.
Bentuk Umum :
Do Until Kondisi
Pernyataan
…
Loop
Perulangan Do Until juga memiliki bentuk sintaks yang lain dimana kondisi diletakkan di akhir pernyataan perulangan. Bentuk sintaksnya adalah sbb :
Do
Pernyataan
……
Loop Until Kondisi
3. While … Wend
Perulangan While … Wend digunakan saat kita ingin pernyataan pada program dijalankan selama kondisi ekspresi yang di tetapkan masih bernilai True.
Bentuk Umum :
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.
Bentuk Umum :
For Indeks = NilaiAwal To NilaiAkhir
Pernyataan
…..
Next Indeks
<![if !supportLineBreakNewLine]>
<![endif]>
