Percabangan
Percabangan merupakan suatu pemilihan perintah-perintah yang akan dijalankan berdasarkan atas syarat eksklusif. Statement atau perintah eksklusif akan dijalankan apabila memenuhi ketentuan yang sudah didefinisikan sebelumnya. Selain struktur percabangan dalam bahasa pemrograman pula terdapat struktur lain yaitu struktur perulangan.
Percabangan dibedakan menjadi :
A. ) Struktur If...Then
Struktur if merupakan kondisi yang paling sederhana, yaitu untuk membandingkan suatu kondisi tertentu. Jika kondisi tersebut benar, maka akan dijalankan ekspresi tertentu. tetapi jika kondisi tersebut salah, ekspresi di dalam if tidak akan dijalankan, dan blok if akan dilompati. Penulisannya :
If (Kondisi) Then
(perintah)
End If
Contoh :
Private Sub Keluar_Click()
If MsgBox ("Anda Yakin Akan Keluar? ", vbQuestion + vbYesNo, "Konfirmasi") = vbOK
ThenUnload Me
End If
End Sub
B. ) Struktur If...Then...Else
Kondisi if ..then ..else adalah pengembangan dari struktur percabangan if. Pada struktur ini kita bisa menentukan pernyataan (statement) lain yang akan dieksekusi jika kondisi pertama tidak memenuhi syarat. Penulisannya :
IF (Kondisi) then
[perintah]
ELSE
[perintah]
End If
Dan
IF (Kondisi2) then
[perintah]
ELSEIF (kondisi2) Then
[perintah]
....
ELSE
[perintah]
Contoh :
If (cmbkode = "Elit") Then
txthm = 50000
ElseIf (cmbkode = "Hemat") Then
txthm = 30000
Else
txthm = 0
End If
C. ) Struktur Select...Case
Struktur Percabangan Select ..Case adalah bentuk yang sederhana pada percabangan. Statement ini bisa digunakan pada dua kondisi ataupun banyak kondisi. Struktur Select Case mempunyai struktur penulisan yang mudah dibandingkan If Then tetapi tidak dapat menguji lebih dari 1 ekspresi. Penulisannya :
Select Case kondisi
Case | Case is = ekspresi1
[perintah1]
Case | Case is = ekspresi2
[perintah2]
Case | Case is = ekspresi3
[perintah3]
Contoh :
Select Case (cmbkode)
Case (“Elit”)
txthm = 50000
Case ("Hemat")
txthm = 30000
Case Else
txthm = 0
End Select
Perulangan
Perulangan merupakan sebuah metode program untuk mengecek ulang terus menerus / berulang suatu blok program dalam batasan pada blok program tersebut. Perulangan biasa digunakan untuk menentukan bagian-bagian pada acara yg akan berulang-ulang berdasarkan kondisi eksklusif.
Perulangan terbagi menjadi beberapa macam yaitu :
A.) For...Next
Perulangan For...Next digunakan untuk melakukan perulangan dengan jumlah tertentu yang dikehendaki. Penulisannya :
For Indeks = (NilaiAwal) To (NilaiAkhir) Step (step)
(Pernyataan)
…..
Next Indeks
B.) Do...While loop
Do While merintahkan program untuk melakukan perulangan apabila kondisi persyaratan masih bernilai True. Apabila kondisi persyaratan bernilai False maka program akan keluar dari perulangan.
Penulisannya :
Do While ( Kondisi )
( Pernyataan )
…
Loop
C. ) Do...Until loop
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 berhenti jika kondisi bernilai True. Penulisannya :
Do
( Pernyataan )
….
Loop until ( Kondisi )
D. ) While...Wend
Perulangan While...Wend digunakan saat kita ingin pernyataan pada program dijalankan selama kondisi ekspresi yang di tetapkan masih bernilai True. Penulisannya :
While ( ekspresi )
( Pernyataan )
….
Wend
> Buatlah suatu form dengan design dan ketentuan sebagai berikut
> Deklarasi variabel dengan tipe data Integer, tulis codenya seperti gambar dibawah
> Pada CheckBox beri kode berikut
> Pada ComboBox beri kode seperti berikut
> Pada Button beri kode seperti berikut
0 komentar:
Posting Komentar