Дипломная работа: Решение задач с помощью современых компьютерных технологий

Label1.Caption = "Значение равно 0"

Else

Labell.Caption = "Значение отрицательное"

End If

Конструкция Select case позволяет обрабатывать в программе несколько условий и аналогична блоку конструкций if.. .Then.. .Else. Эта конструкция состоит из анализируемого выражения и набора операторов case на каждое возможное значение выражения. Работает эта конструкция следующим образом. Сначала Visual Basic вычисляет значение заданного в конструкции выражения. Затем полученное значение сравнивается со значениями, задаваемыми в операторах case конструкции. Если найдено искомое значение, выполняются команды, приписанные данному оператору case. После завершения выполнения конструкций управление будет передано конструкции, следующей за ключевым словом End Select.

Синтаксис конструкции Select Case следующий:

Select Case сравниваемоеЗначение

CASE значение1

конструкция1

CASE значение2

конструкция2

. . .

End Select

В начале конструкции расположены ключевые слова select case , указывающие, что расположенный рядом с ними параметр сравниваемоеЗначение будет проверяться на несколько значений. Далее следуют группы команд. начинающиеся с ключевого слова Case . Если параметр сравниваемоеЗначение равен значению, указанному в текущем операторе case , то будут выполняться команды, расположенные между этим и следующим ключевым словом case . Select Case может выполнить не более одной из содержащихся в ней последовательностей конструкций. После того как одно из условий оказалось равно True, и была выполнена соответствующая последовательность конструкций, Select Case завершит свою работу. Остальные условия проверяться не будут.

В программах Visual Basic для выполнения повторяющихся действий используются циклы. Они бывают следующих типов:

· For...Next

· For Each...Next

· Do. . . Loop

Конструкция For...Next выполняет последовательность команд определенное число раз. Такую конструкцию называют циклом, а выполняемые ею программные коды — телом цикла.

Синтаксис конструкции For.. .Next следующий:

For счетчик = начЗначение То конЗначение [Step шаг]

конструкции

Next[счетчик]

Первый аргумент конструкции — счетчик — определяет имя переменной, которая будет "считать" количество выполнении цикла. Параметр начЗначение указывает числовое значение, которое присваивается переменной-счетчику перед первым проходом цикла. Цикл выполняется до тех пор, пока значение счетчика не превысит конечного значения, указанного после ключевого слова то. После каждого прохода цикла значение счетчика изменяется на величину шаг, указанную за ключевым словом step. Ключевое слово Next обозначает конец тела цикла и является обязательным. Перед каждым проходом цикла Visual Basic сравнивает значения счетчика и аргумента конЗначение. Если значение счетчика не превышает установленного значения конЗначение, выполняются конструкции тела цикла. В противном случае управление переходит к следующей за Next конструкции. Например:

For nCountVar = 1 То 10 Step 2

nNextWeek(nCountVar) = nCountVar * 2

Next

Здесь цикл выполняется пять раз при значениях счетчика nCountVar 1, 3, 5, 7 и 9.

Шаг изменения счетчика может быть отрицательным. Например: