TUTORIAL VB 6.0: PERSYARATAN (SELECTION WITH IF)

MENGGUNAKAN SELEKSI " IF - END IF "

Struktur yang digunakan adalah

If (kondisi) then

(pernyataan)

End If

Persyaratan IF digunakan sebagai seleksi sesuatu atau pembanding sesuatu. Sebagai contoh, Anda membeli sebuah barang di toko atau pasar swalayan, jika barang yang Anda beli lebih dari 10 buah maka Anda mendapatkan suatu diskon pembelian atas barang yang Anda beli. Namun jika barang yang Anda beli jumlahnya kurang dari 10 maka Anda tidak mendapatkan diskon pembelian.

Perhatikan contoh di bawah ini :

Contoh 1 :

Dalam kasus peminjaman DVD film, Anda bertindak sebagai peminjam yang kebetulan Anda adalah member pada tempat peminjaman tersebut. Karena Anda sebagai member, maka Anda berhak mendapatkan potongan (diskon) setiap kali Anda melakukan peminjaman DVD.

Disainlah sebuah form untuk mendeskripsikan kasus di atas dengan ketentuan sebagai berikut :

" jika member, maka mendapatkan diskon sebesar 10% dari total bayar"

Disain form akan tampak seperti berikut ini :

Form di atas men gunakan komponen OptionButton yang berfungsi sebagai pilihan, pada kasus ini pilihannya adalah apakah MEMBER atau NON-MEMBER.

Ketik sintak-sintak di bawah ini :

Kemudian running form dan isikan Inputan pada Frame Inputan lalu tekan tombol PROSES, maka akan muncul hasinya sebagai berikut :

Hasil eksekusi MEMBER

Hasil eksekusi NON-MEMBER

MENGGUNAKAN SELEKSI " IF ELSEIF - END IF "

Struktur yang digunakan adalah :

If (kondisi) then

Elseif (kondisi) then

Else

End If

Struktur ini lebih simpel karena tidak memerlukan banyak penutup "End if", cukup hanya dengan satu penutup "End if" saja. Untuk lebih jelas, disainlah sebuah form untuk mendeskripsikan kasus di atas dengan ketentuan sebagai berikut :