Sebenarnya fungsi Select Case sama seperti fungsi If-Then-Else, hanya saja dalam Select Case apa yang akan terjadi selanjutnya menggunakan case
OK, untuk fungsi Select Case saya membuat program untuk mengetahui nilai huruf dari nilai angka, penampakannya seperti ini :
Sederhana bukan? bentuk tampilan formnya seperti ini
berikutnya adalah statement penamaan untuk masing - masing elemen :
Me.Text = "Select Case"Agar saat tombol diklik, maka akan keluar nilai hurufnya, saya memasukkan statement ini
Label1.Text = "Nilai"
Button1.Text = ">"
Label2.Text = "-----"
Select Case angkajadi, syntax dari Fungsi Select Case adalah
Case 80 To 100
Label2.Text = "A"
Case 70 To 79
Label2.Text = "B"
Case 60 To 69
Label2.Text = "C"
Case 50 To 59
Label2.Text = "D"
Case 0 To 49
Label2.Text = "E"
End Select
Select Case kondisisaya juga menggunakan fungsi Dim As di program ini dimana variabel "angka" adalah angka dari TextBox1, penggunaannya seperti ini
Case kondisi1
pernyataan
Case kondisi2
pernyataan
Case kondisi(n)
pernyataan
End Select
Sehingga saat di debug, saya masukkan angka 65
dan nilai hurufnya adalah
Mudah bukan?
Tidak ada komentar:
Posting Komentar