Selasa, 23 Juni 2015

Penggunaan Select Case pada Visual Basic

Penggunaan Select  Case pada Visual Basic
Pada dasarnya select case sama saja sepeti percabangan kondisi IF THEN ataupun IF THEN ELSE , akan tetapi select case digunakan ketika kita mempunyai suatau percabangan yang banyak. Select Case juga lebih sangat mudah dan tidak ribet dibandingkan oleh IF THEN ELSE.
Syntax nya :
Select Case <kondisi>
Case <Pilihan1>
... <pernyataan1>
Case <pilihan2>
... <pernyataan2>
Case <Pilihan3>
... <pernyataan3>
Case <pilihan4>
... <pernyataan4>
Case Else
... <pernyataan-n>

End Select

Contohnya
Aplikasi Aritmatik sederhana dengan menggunakan fungsi SELECT CASE
Logika aplikasi ini, ketika kita memberikan data input bilangan 1 dan bilangan 2 serta operator (Penjumlahan, Pengurangan, Perkalian, Pembagian, dan Pangkat) maka akan keluar hasilnya.
Tampilan User Interface.
User Interface nya

Pada Aplikasi kali ini , kita tidak menggunakan object commandbutton, jadi perintah pengkodingan diberikan kepada text3.text atau pada textbox operator. 
Jadi code nya begini.: Private Sub Text3_Change ()
Lebih jelas nya perhatikan gambar kodingan berikut :
Membuat Perintah atau Peng-kodingan.
Ini tampilan pengkodingannya.:

·        Pada variabel nilai1 dan nilai2 sebagai data input dari text1 dan text2.
·        Jangan lupa pemberian tipe data integer, karena angka/numeric/bilangan.
·        Select case digunakan pada text3 karena kita memberikan pengkodingan nya pada pemberian input operator.
·        Operator yang kita gunakan : +, -, *, /, dan ^ selain itu maka operator dianggap salah.
·        Logika: Ketika pada text3 berisi tanda “+” maka nilai1 + nilai2 dan selanjutnya.

·        Jangan lupa End Select pada terakhir.
Kuliah Algoritma Pemrograman Visual Basic
http://uzi-online.blogspot.com/2000/11/kuliah-algoritma-pemrograman-vbasic.html

1 komentar:

  1. Tritanium Sledgehammer | T-Tech - Titanium Arts
    Tritanium's design is inspired rocket league titanium white octane by the original ironing micro touch titanium trim and plating head titanium ti s6 used in traditional titanium tools brass workstations. It 토토 사이트 is made by

    BalasHapus