Основы VB.NET
Урок 21. Операторы If и Select Case
Операторы If и Select Case работают точно так же, как и в предыдущих версиях VB.
Вот пример использования оператора If:
Dim a, b As Integer
a = 2
b = 4
If b <> 0 Then
Console.WriteLine("a/b={0}", a / b)
Else
Console.WriteLine("На ноль делить нельзя!")
End If
Ясно, что эта программа выведет на экран строку "a/b=0.5".
Else можно не писать, если он не особенно нужен.
Пример на Select Case:
Dim a As Integer
Console.WriteLine("Введите оценку")
a = CInt(Console.ReadLine())
Select Case a
Case 1, 2
Console.WriteLine("Двоечник")
Case 3
Console.WriteLine("Троечник")
Case 4
Console.WriteLine("Хорошист")
Case 5
Console.WriteLine("Отличник")
Case Else
Console.WriteLine("Ошибка")
End Select
Тут программа ожидает, что за оценку введет пользователь и выводит соответствующую надпись. Обратите внимание, что мы читаем строку, которую надо преобразовать к целому:
a = CInt(Console.ReadLine())
Веточка Case Else необязательна. Если она есть, то код, написанный в ней, будет выполняться, если ни один из предыдущих case не подошел.
Обратите внимание на строку
...
Case 1, 2
...
Эта ветка выполнится если переменная a будет равна 1 или 2.
Вот еще возможные варианты синтаксиса для case:
...
Case 1 To 10
Console.WriteLine("Число от 1 до 10")
Case Is < 0
Console.WriteLine("Отрицательное число")
...
Ключевое слово To задает диапазон значений, Is обозначает само число (a в нашнем случае). Т. е. если a меньше нуля, то выведется надпись "Отрицательное число".
|
