Пример использования оператора выбора
Рассмотренную при изучении условного оператора задачу об определении процента отклонения можно решить, используя оператор Select Case.
Для этого в коде программы во фрагменте вычисления процента отклонения от плана нужно заменить оператор If...End If следующим оператором:
Select Case sngПроцент
Case Is > 100
sngОтклонение = sngПроцент - 100
strОтклонение = "План перевыполнен на " & _
Format(sngОтклонение, "0.00") & "%"
Case Is < 100
sngОтклонение = 100 - sngПроцент
strОтклонение = "План недовыполнен на " & _
Format(sngОтклонение, "0.00") & "%"
Case Else
strОтклонение = "План выполнен на 100%"
End Select
В этом случае программа будет работать точно также как и при использовании оператора If, но имеет более прозрачный вид, т.к. реализует схему алгоритма разветвляющегося вычислительного процесса с несколькими выходами.
Проектирование приложений с циклами
Назначение операторов цикла
В языке Visual Basic имеется два вида операторов цикла:
1) условный;
2) со счетчиком.
Они предназначены для организации в программе циклических вычислительных процессов. С помощью различных модификаций условного цикла реализуются циклы с предусловием и постусловием, а с помощью цикла со счетчиком – цикл с параметром.
Операторы цикла предусматривают повторяющееся выполнение группы операторов (тела цикла).
Если число повторений известно заранее (до начала повторений), то лучше использовать оператор цикла со счетчиком, в противном случае оператор условного цикла.
Условные циклы
Условный цикл получил свое название в силу того, что при каждом повторении проверяется выполнение условия и в зависимости от результатов проверки принимается решение о дальнейших действиях. Проверка условия может осуществляться как до действий, указанных в теле цикла, так и после них. В соответствии с этим в VB имеется две модификации условного цикла:
1) с верхним окончанием;
2) с нижним окончанием.
Условный цикл с верхним окончанием имеет вид
Do {While | Until} <условие>
<операторы тела цикла>
Loop
Конструкция {While | Until} означает, что используется только одно из ключевых слов: либо While (Пока), либо Until (До)
Этот оператор цикла выполняется следующим образом. Вначале проверяется условие. Если оно удовлетворяется и перед ним стоит ключевое слово While, то выполняются операторы тела цикла, после чего весь процесс повторяется. Повторения продолжаются до тех пор, пока условие удовлетворяется. Если условие не удовлетворяется, то происходит переход к оператору, следующему за оператором цикла (после слова Loop).
Ключевое слово Until имеет противоположный смысл. Повторения в цикле продолжаются до удовлетворения условия. Если же оно удовлетворяется, то происходит выход из цикла.
Условный цикл с нижним окончанием имеет вид
Do
<операторы тела цикла>
Loop {While | Until} условие
т.е. в нем условие проверяется после выполнения операторов тела цикла.
Исходя из этого, цикл с нижним окончанием используется тогда, когда операторы тела цикла должны выполняться хотя бы один раз, а с верхним – может быть и ни разу.
Вычислительный процесс, описываемый алгоритмом на базе цикла с предусловием, в программе на VB представляется оператором
Do While <условие>
<операторы тела цикла>
Loop
а на базе цикла с постусловием – оператором
Do
<операторы тела цикла>
Loop Until <условие>
Среди операторов тела цикла может встретиться оператор Exit Do, который обеспечивает немедленный выход из цикла (до достижения ключевого слова Loop).
Дата добавления: 2020-10-14; просмотров: 428;