02 November 2010

Memahami konsep pemilihan (if else dan case ) dalam visual basic 6.0




Setiap bahasa pemrograman tak lepas dari yang namanya logika. Setiap logika tak lepas dari runtutan runtutan serta pemilihan, karena dalam suatu alur program sering ditemukan beberapa opsi untuk mencapai tujuan atau hasil yang diinginkan.
Dalam kesempatan kali ini saya akan mengulas mengenai pemilihan dalam visual basic dimana terdapat dua konsep pemilihan yaitu dengan menggunakan if else dan juga case. Sekarang kita akan membahas if else saja dulu.
1.       Pemilihan if else
Pada pemilihan if else mempunyai 3 macam yaitu if else tunggal, majemuk dan bersyarat (bercabang).
a.       Tunggal
Merupakan pemilihan  yang hanya memiliki satu pilihan syntaxnya adalah
If then
       
End if

contoh : persyaratan yang hanya tedapat pilihan yes atau no
if combo1.text=”yes”  then
  label1.text=”anda berhasil”
endif
b.      Majemuk
Pemilihan  yang bersifat majemuk atau memiliki banyak opsi. Syntaxnya adalah sebagai berikut :
 If then
  < pernyataan setelah pemilihan 1>
Else if < kondisi 2> then

Else if .............. then
.
.
.
Else

End if
Contoh dalam nilai ujian mahasiswa, jika nilai lebih dari 80 maka mendapat grade A, jika lenih dari 70 maka mendapatkan nilai B, jika lebih dari 60 maka mendapatkan C, selain itu atau dibawah 60 mendapatkan D.
Nilai =val(text1.text)
If nilai >=80 then
        Label1.text=” Anda mendapatkan Grade A”
Else if  nilai >=70 then
Label1.text=”Anda menadapat grade B”
Else if  nilai >=60 then
Label1.text=”Anda mendapat grade C”
Else
        Label1.text=”Anda Mendapat nilai D
Endif
c.       Pemilihan bersyarat atau  bercabang
Dalam pemilihan ini artinya dalam satu pemilihan terdapat syarat atau pemilihan lagi.
Syntaxnya seperti ini :
If then
 If then
Else if < kondisi syarat n> then
.
.
.
Else

Endif
Else
End if
Contoh dalam persyaratan masuk ke sebuah instansi dibedakan menjadi dua bagian yaitu laki laki dan perempuan, sementara untuk perempuan ada persyaratan lagi, jika umur lebih dari 25 maka tidak diterima, sedangkan untuk laki-laki jika umur di atas 30 maka tidak diterima.  Syntaxnya  sebagai berikut :
Umur =val(Text1.text)
If combo1.text=”laki - laki” then
If umur >30 then
Label1.text=”Anda Tidak Diterima”
Endif
Else
If  umur > 25 then
Label1.text=”Anda Tidak Diterima”
End if
End if

Bagaimana ??? bisa dimengerti?? Kalau bisa alhamdulillah berarti ilmu yang saya dapat tidak sia sia, namun apabila anda merasa kurang paham atau anda mau mengkoreksi silahkan saja tinggalkan komen anda. Oke?? Udah dulu ya..  sampai jumpa di postingan selanjutnya.
Salam sobat BM. J


2 comments:

  1. info yang bagus gan buat ane, kunjungi blog ane dan kasih masukan dibuku tamu, maklum masih newbie

    ReplyDelete