select case adalah satu kondisi yang didalamnya terdapat beberapa kondisi lagi dan proses data yang disebut case. berbeda halnya dengan kondisi if then yang mana sudah pernah kita coba dalam tulisan sebelumnya disini https://notemazdopunk.blogspot.com/2022/09/penggunaan-statement-else-if-visual-basic.html dimana kondisi if then adalah satu proses data dengan satu kondisi. ketika ingin menambah kondisi kita harus menggunakan pengkondisian elseif pada visual basic.
select case <condition>case is = <condtion 1>process datacase is = <condtion 2>process datacase is = <condtion 3>process datacase elseprocess dataend select
atau saya lebih sering menulis syntaxnya tanpa is yang kurang lebihnya seperti berikut
select case <condition>
case <condtion 1>
process data
case <condtion 2>
process data
case <condtion 3>
process data
case else
process data
end select
dan adapun arti dari syntax diatas kurang lebihnya seperit berikut
pilih pada pilihan kondisi
pilihan pada kondisi 1
proses data
pilihan pada kondisi 2
proses data
pilihan pada kondisi 3
proses data
pilihan selain pilihan diatas
proses data
akhir pilih
biar kita bisa lebih memahami syntax diatas mari kita coba membuat contoh select case dalam penulisan kode dalam project form visual basic kita yang mana kita buat dan rancang form beserta komponen project visual basic kita. dan komponen yang akan kita pakai adalah sebagai berikut kurang lebihnya
1. Project
- name = CaseVb6
2. Form
- caption = Select Case vb6
- StartupPosition = Center Screen
3. Listbox
- name = Lst
4. Label
- caption = Nama barang
- Backstyle = Transparent
- Autosize = true
5. Label
- caption = Harga barang
- Backstyle = Transparent
- Autosize = true
6. Textbox
- name = txtNmBrg
- text = kosong
- Appereance = flat
- Locked = true
7. Textbox
- name = txtHrgBrg
- text = kosong
- Appereance = flat
- Locked = true
8. Commandbutton
- name = cmdLhtData
- caption = Lihat Data
sehingga untuk tampilan form kita akan menjadi seperti berikut kurang lebihnya
Private Sub Form_Load()Lst.AddItem "Buku"Lst.AddItem "Pensil"Lst.AddItem "Korek Api"End Sub
dan ketika kita jalankan project kita maka listbox atau komponen Lst akan terisi "Buku,Pensil,Korek Api" seperti berikut
Private Sub cmdLhtData_Click()Select Case Lst.TextCase Is = "Buku"Me.txtNmBrg.Text = "Buku tulis"Me.txtHrgBrg = "Rp. 10.000,00"Case Is = "Pensil"Me.txtNmBrg.Text = "Pensil"Me.txtHrgBrg = "Rp. 1.000,00"Case "Korek Api"Me.txtNmBrg.Text = "Korek"Me.txtHrgBrg = "Rp. 1.000,00"Case ElseMsgBox "Maaf belum ada pilihan", vbInformationEnd SelectEnd Sub
jika kita jalankan form kita dan ketika kita belum memilih pilihan listbox atau komponen Lst maka akan keluar pesan box "Maaf belum ada pilihan". tapi jika kita pilih salah satu dari Listbox atau komponen Lst maka ketika klik commandbutton atau komponen cmdLhtData maka akan keluar output di kedua textbox atau pada komponen txtNmBrg dan komponen txtHrgBrg sesuai dengan kode proses data pada case atau kondisi di select case kita tadi yang untuk ooutputnya kuran glebih seperti berikut
pada kode select case diatas sengaja kita buat ada yang memakai is dan ada yang tidak memakai is. biar kita tahu tentang keyword is yang digunakan dalam statement select case.
jadi seperti itulah penggunaan select case vb ini yang mana penggunaan select case vb ini juga sering akan kita pakai dalam pembuatan applikasi nantinya. dan saya rasa cukup sekian dulu untuk tulisan kali ini tentang select case vb atau vb6 select case atau contoh select case atau Penggunaan Select Case Pada Visual Basic atau struktur kontrol select case vb. semoga tulisan ini bisa memberi manfaat pada kita semua terkhusus untuk saya pribadi Aamiiin. dan kita akan lanjut di next tulisan insya Allah.
bagi yang ingin download source codenya bisa download disini
Salam sobat semua
#vb6 #vba #vb #select #case #selectcase #free #share #download #source #code #sourcecode
vb6,vba,vb,select,case,selectcase,free,share,download,source,code,sourcecode
tags:
vba select case
select case
vba case
case select
vba switch case
select case php
vb select case
select case vb
excel vba switch case
switch case vb
access vba select case
vb6 select case
access select case
access vba case
vba case if
vb6 case
contoh select case
jelaskan tentang keyword is yang digunakan dalam statement select case
select case adalah
Aplikasi Penggunaan If Then Else dan Select Case Pada Visual Basic
VISUAL BASIC 6 : PERCABANGAN (SELECT CASE)
Struktur Kode Pernyataan Select Case
Cara Pengkondisian if dan select case pada VB
struktur kontrol select case vb if then
struktur kontrol select case vb bahasa pemrograman
struktur kontrol select case vb then else
struktur kontrol select case vb vb net
struktur kontrol select case vb visual studio
struktur kontrol select case vb kontrol percabangan
struktur kontrol select case vb kontrol perulangan
struktur kontrol select case vb kontrol keputusan
struktur kontrol select case vb contoh program
Comments
Post a Comment