Struktur SELECT – CASE digunakan untuk menjalankan satu blok perintah yang jumlahnya banyak atau bertingkat-tingkat. Struktur ini mirip dengan struktur IF – THEN – ELSE, tetapi SELECT – CASE mempunyai penulisan yang lebih mudah sehingga penulisan programnya lebih efisien dan mudah dibaca oleh pembuat program.
Perbedaan antara SELECT – CASE dengan struktur IF – THEN – ELSE adalah bila struktur IF – THEN – ELSE menyeleksi suatu kondisi dan terpenuhi, selanjutnya proses penyeleksian masih digunakan terhadap struktur IF – THEN – ELSE berikutnya. Sedang pada struktur SELECT – CASE bila salah satu kondisi sudah terpenuhi dan blok program telah diproses, selanjutnya blok program lainnya dalam lingkungan SELECT – CASE tidak akan diseleksi lagi. Penulisan dari struktur SELECT -CASE sebagai berikut:
Select Case tes_ekspresi
Case ekspresi-1:
… blok perintah-1 …
Case ekspresi-2:
… blok perintah-2 …
Case ekspresi-n:
… blok perintah-n …
Case Else
… blok perintah-alternatif …
End Select
Keterangan:
Ø Tes_ekspresi:
Tes_ekspresi ini bisa bernilai numerik maupun string.
Ø Ekspresi-1:
Nilai pertama proses seleksi dari tes_ekspresi.
Ø Ekspresi-2:
Nilai pertama proses seleksi dari tes_ekspresi. Penulisan nilai pada ekspresi-1 maupun ekspresi-2 bisa langsung berbentuk konstanta atau melalui operator pembanding.
Ø Blok perintah-1:
Suatu rangkaian perintah yang dikerjakan bila kondisi ekspresi-1 terpenuhi.
Ø Blok perintah-2:
Suatu rangkaian perintah yang dikerjakan bila kondisi ekspresi-2 terpenuhi.
Ø Blok perintah-alternatif:
Suatu rangkaian perintah yang dikerjakan bila kondisi-kondisi yang ada tidak ada yang memenuhi syarat.
Contoh:
Dim Data As Byte
Data = 1
Do
Select Case Data
Case 1 : Call Kiri()
Case 2 : Call Kanan()
Case 3 : Call Tengah()
Case Else : Call Stop()
End Select
Loop
0 comments:
Post a Comment