Algoritma Keputusan (Kondisi) pada Visual Basic .Net menggunakan dua cara yaitu If .. Else dan Select .. Case. Pernyataan If .. Else digunakan jika Anda memiliki kondisi umum atau beberapa kondisi untuk di periksa apakah script program selanjutnya akan di eksekusi atau tidak. Sementara pernyataan Select Case digunakan untuk membandingkan suatu variabel yang akan diperiksa terhadap serangkaian nilai tanpa menghitung ulang atau memperoleh variabel yang lain. Biasanya perintah select case akan lebih mudah untuk dieksekusi dengan membandingkan suatu variabel terhadap banyak pilihan nilai kecocokan.
Struktur penulisan untuk pernyataan If…Else:
Pernyataan If dapat diikuti oleh pernyataan Else (opsional), yang akan dijalankan jika kondisi yang diperiksa bernilai False. Jika kondisi bernilai True, maka pernyataan blok If pertama yang akan dieksekusi, dilanjutkan ke pernyataan blok If kedua dan seterusnya hingga semua kondisi bernilai False.
Struktur penulisan untuk pernyataan Select…Case:
Dengan beberapa pilihan kondisi, kita masih bisa menggunakan pernyataan If .. Else, namun jika sebuah variabel akan diperiksa dengan pilihan kondisi cukup banyak maka kita dapat memutuskan untuk menggunakan pernyataan Select Case. Pernyataan Select Case merupakan cara lain untuk menguji sebuah masukan berupa variabel. Select Case akan mengeksekusi klausa pertama di mana <kondisi> atau variabel akan diperiksa dengan mengevaluasi Case pertama.
Select Case akan selalu mengevaluasi terhadap True, jika Case pertama bernilai True maka script program pada Case pertama akan dieksekusi, jika tidak maka akan dilanjutkan pada Case kedua. Program ini akan terus memeriksa semua variabel setelah Case sebelumnya untuk melihat apakah salah satunya sesuai dengan nilai yang ada pada variabel yang diperiksa. Namun jika tidak menemukan kecocokan, maka kita sediakan opsi terakhir yaitu menggunakan perintah Case Else. Anda dapat menggunakan perintah Case Else atau Case After. Maka script program yang akan dijalankan adalah berada pada bagian case Else.
Berikut ini adalah contoh penggunaan struktur algoritma If .. Else dan Select Case untuk menentukan jenis nilai huruf dan predikat dari masukan berupa nilai integer.
Script program dengan pernyataan If .. Else:
Public Class If_Else
Private Sub
btnOk_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles btnOk.Click
Dim Nilai As Integer
Dim Grade As String
Nilai = Val(TextBox1.Text)
If Nilai >= 80 And
Nilai <= 100 Then
Grade = "A"
Else
If (Nilai >= 65 And
Nilai < 80) Then
Grade = "B"
Else
If
(Nilai >= 55 And Nilai < 65) Then
Grade = "C"
Else
If (Nilai >= 45 And
Nilai < 55) Then
Grade = "D"
Else
If
(Nilai >= 1 And Nilai < 45) Then
Grade = "E"
Else
Grade = "Nilai
yang anda masukan salah."
End If
End If
End If
End If
End If
MsgBox("Grade
" & Grade)
End Sub
End Class
Script program dengan pernyataan Select .. Case:
Public Class Form5
Private Sub
btnOk_Click(sender As Object, e As EventArgs) Handles
btnOk.Click
Dim nilai As Integer
nilai = val(TextBox1.Text)
While
nilai <> 0 And nilai <= 100 Do
Select Case
nilai
Case 100
MsgBox("Nilai istimewa")
Case 85 To 99
MsgBox("A")
Case 75 To 84
MsgBox("B")
Case 65 To 74
MsgBox("C")
Case 55 To 64
MsgBox("D")
Case 1 To 54
MsgBox("E")
Case Else
MsgBox("Nilai
yang anda masukan salah.")
End Select
End While
End Sub
End Class
0 Response to "Pernyataan Keputusan Seleksi Kondisi Pada visual Basic.Net"
Posting Komentar