Örnek 4:
Metin kutusuna girilen sayı 1 ise, Ergün
2 ise, Erhan
3 ise, Nuran
4 ise, Olcay
5 ise, Gönül
hiçbiriyse, “yanlış değer” mesajı görüntülensin.
Ekran Görüntüsü
Kodlar
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click
Select Case TextBox1.Text
Case 1
MsgBox("Ergün")
Case 2
MsgBox("Erhan")
Case 3
MsgBox("Nuran")
Case 4
MsgBox("Olcay")
Case 5
MsgBox("Gönül")
Case Else
MsgBox("Yanlış değer")
End Select
End Sub
End Class
18