Struktur Keputusan Menggunakan Case - Struktur ini digunakan
sebagai alternatif pengganti dari struktur If…Then…Else. Penulisan pada
Select Case lebih mudah & efisien dan mudah dibaca/dipahami oleh
pemrogram. Jika alternatif suatu kondisi sedikit kita bisa menggunakan
pencabangan If.
Namun bila pilihannya banyak, akan lebih mudah jika kita menggunakan pencabangan Case.
Syntax : Select Case Variabel
Case Value1
Statement1
Case Value2
Statement2
Case Value3
Statement3
..
..
End Select
Contoh :
1. Rancang form seperti di atas
2. Tulis code berikut di dalam tombol proses
Private Sub BtnProses_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnProses.Click
Select Case Nilai.Text
Case Is >= 80
Huruf.Text = "A"
Case 70 To 79
Huruf.Text = "B"
Case 60 To 69
Huruf.Text = "C"
Case 50 To 59
Huruf.Text = "D"
Case Is <= 49
Huruf.Text = "E"
End Select
End Sub
Semoga Bisa Bermanfaat ya teman.....
Wednesday, 3 April 2013
Subscribe to:
Post Comments (Atom)
0 comments:
Post a Comment