Основные сведения об операторах VB

 

Функция MsgBox

MsgBox(сообщение[, кнопки][, заголовок][, файл справки, контекст])

Выводит на экран диалоговое окно, содержащее сообщение, устанавливает режим ожидания нажатия кнопки пользователем, а затем возвращает значение типа Integer, указывающее, какая кнопка была нажата.

Функция InputBox

InputBox(сообщение[, заголовок][, умолчание][, Xпоз][Yпоз])

Выводит на экран диалоговое окно, содержащее сообщение и поле ввода, устанавливает режим ожидания ввода текста пользователем или нажатие кнопки, а затем возвращает значение типа String, содержащее текст, выведенный в окне.

Условный оператор IF

Для проверки одного условия и выполнения оператора или блока операторов используется оператор IF…THEN. Этот оператор можно использовать с разным синтаксисом: однострочным (линейным) и многострочным (блочным).

а) Однострочный:

If < условие > Then < оператор >

б) блочный:

If < условие > Then

< блок операторов >

End If

Для проверки одного условия и выбора одного из двух блоков операторов используется оператор вида If…Then… Else.

If < условие > Then

< блок операторов1 >

Else

< блок операторов2 >

End If

Для проверки более одного условия и выполнения одного из нескольких блоков операторов используется оператор вида
If… Then…ElseIf

 

If < условие 1 > Then

< блок операторов 1>

ElseIf < условие 2 > Then

< блок операторов 2 >

…………….

ElseIf< условие n > Then

< блок операторов n >

Else

< блок операторов Else >

End If

 

Оператор выбора SELECT CASE

Используется для проверки одного условия и выполнения одного из нескольких блоков операторов.

Формат записи оператора:

Select Case проверяемое выражение

Case список выражений 1

операторы 1

Case список выражений 2

операторы 2

Case список выражений 3

операторы 3

……………………………….

Case Else

операторы группы Else

End Select

Проверяемое выражение вычисляется в начале работы оператора Select Case. Это выражение может возвращать значение любого типа (логическое, числовое, строковое).

Список выражений – одно или несколько выражений, разделенных стандартным символом – разделителем (,).

При выполнении оператора проверяется, соответствует ли хотя бы один из элементов этого списка проверяемому выражению. Эти элементы списка выражений могут иметь одну из следующих форм:

- выражение

- выражение 1 To выражение 2

- Is логический оператор (оператор сравнения) выражение

Например, Is >= 10

 

Оператор цикла For…Next имеет две разновидности:

a) For счетчик = начало To конец [Step приращение ]

операторы

Next [ счетчик ]

б) For Each < элемент > In < группа >

операторы

Next [ элемент ]

 

Оператор цикла WHILE…END WHILE

Используется для организации циклов с предусловием и имеет следующий формат:

While < условие продолжения цикла >

операторы тела цикла

End While

 

Оператор цикла DO…LOOP

Используется для организации циклов с неопределенным числом повторений (с предусловием и с постусловием).

Этот оператор для организации цикла с предусловием может использоваться в двух модификациях:

а) Do While < условие продолжения цикла >

операторы тела цикла

Loop

б)Do Until < условие прекращения цикла >

операторы тела цикла

Loop

Для организации цикла с постусловием этот оператор также может быть использован в двух модификациях:

в) Do

операторы тела цикла

Loop While < условие продолжения цикла >

г)Do

операторы тела цикла

Loop Until < условие прекращения цикла >

 

Оператор перехода GoTo

Этот оператор позволяет выполнить безусловный переход к заданной строке активной процедуры.

Формат оператора:

GoTo строка

строка – это метка строки в процедуре. Метка строки представляет собой строку программы, в начале которой указывается имя метки и двоеточие. Количество меток не ограничено, но каждая должна быть уникальна.

 

Оператор With для операций с одним объектом.

Если в одном блоке программы требуется выполнить несколько операций с одним объектом, то это можно явно указать оператором With, а затем не повторять имя этого объекта.

Формат записи оператора:

With (объект)

[ операторы ]

End With

 

Приложение 2

 

1. Создать процедуру нахождения максимального из введенных чисел и среднего арифметического среди положительных чисел.

2. Создать процедуру нахождения разности среднего арифметического и минимального из введенных чисел.

3. Создать процедуру нахождения разности максимального среди введенных чисел и среднего арифметического среди отрицательных чисел.

4. Создать процедуру нахождения минимального из введенных чисел и среднего арифметического отрицательных чисел.

5. Создать процедуру нахождения разности между максимальным числом и минимальным.

6. Создать процедуру нахождения произведения нечетных чисел и количества четных чисел.

 

7. Создать процедуру нахождения разности между количеством положительных и количеством отрицательных чисел.

8. Создать процедуру нахождение количества чисел больших среднего арифметического.

9. Создать процедуру нахождения количества чисел равных максимальному числу.

10. Создать процедуру нахождения произведения максимального числа и минимального.

11. Создать процедуру нахождения количества чисел, кратных 5 и максимальное среди них.

12. Создать процедуру нахождения максимального из четных чисел и среднего арифметического среди нечетных чисел.

13. Создать процедуру нахождения минимального из нечетных чисел и сумму четных чисел.

14. Создать процедуру нахождения произведения четных чисел и максимального среди нечетных чисел.

15. Создать процедуру нахождения суммы и количества положительных чисел, кратных 3.

16. Создать процедуру нахождения произведения отрицательных чисел, кратных 3 и количества четных чисел.

17. Создать процедуру нахождения среднего арифметического элементов массива, имеющих нечетные номера и максимальное число.

18. Создать процедуру нахождения произведения элементов массива, имеющих четные номера и минимальное число.

19. Создать процедуру нахождения разности между суммой первых пяти элементов массива и суммой последних пяти.

20. Создать процедуру нахождения количества чисел, значения которых больше разности максимального числа и минимального.

21. Создать процедуру нахождения максимального числа и минимального, среди элементов с четными номерами.

22. Создать процедуру нахождения количества чисел, значения которых больше среднего арифметического отрицательных чисел.

23. Создать процедуру нахождения минимального значения среди нечетных чисел и количество четных чисел.

 

Приложение 3