Тема 2. Основы алгоритмизации и программирования
Тема 2.1. Базовые понятия программирования.

Занятие 12.1.   Упражнения. Самостоятельная работа.

Проверь себя

1. Что такое обработчик событий?  Как связать с определенным событием его обработчик?
2. Что такое процедура? Опишите структуру процедуры – обработчика событий.
3. Приведите общий вид команды, которой можно изменить значение свойства  элемента управления. Приведите примеры таких команд.
4. Как обозначаются синтаксические ошибки в среде разработки?  Приведите примеры.
5. Какие элементы управления можно использовать для ввода и вывода данных?
6. Как вывести сообщение в отдельное специальное окно?
7. Для чего предназначены функции Str, Val?
8. Что определяет тип переменной? Какие типы переменных вы знаете?
9. Какие значения могут принимать  переменные типа  Integer  и типа Single? Какой размер участка памяти выделяется для хранения значений переменных каждого из этих типов?
10. Как описываются типы переменных, которые используются в процедуре; во всей программе?
11. Какие переменные называются локальными, а какие – глобальными?
12. Какой общий вид команды присваивания в Visual Basic?

Пример. Проект простейшего калькулятора.

Интерфейс проекта

Вариант 1                                                                                                Вариант 2

Программный код проекта

   Dim a, b As Single
    Dim c As Single
    Dim n As Integer

  Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        c = a + b
        TextBox3.Text = Str(c)
    End Sub

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        c = a - b
        TextBox3.Text = Str(c)
    End Sub

    Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
        c = a / b
        TextBox3.Text = Str(Format(c, "00.###"))
    End Sub

    Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
        c = a * b
        TextBox3.Text = Str(c)
    End Sub

    Private Sub Button8_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button8.Click
        c = System.Math.Round(a / b)
        TextBox3.Text = c
    End Sub

    Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click
        End
    End Sub

Выполните задания

1. Запишите команды присваивания переменной х значений приведенных выражений:

2. Откройте новый проект.

Измените заголовок формы на Я изменяю значения свойств формы.
Разместите на форме кнопку.
Измените заголовок кнопки на Изменить.
Создайте для события Click кнопки заготовку обработчика этого события.
Введите в процедуру команды, которые изменят цвет окна на vbPurple, уменьшат ширину окна на 100 пикселей и увеличат его высоту на 200 пикселей.
Исполните проект.  Убедитесь, что изменились размеры и цвет окна. Сохраните проект.

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

Установите желтый цвет фона и синий цвет текста для вывода результата.
Предусмотрите вывод результата еще и в окно для сообщений.
Выполните проект несколько раз для разных чисел, следите за правильностью результата.
Сохраните проект.

4. Откройте новый проект.

Установите заголовок формы Доступный/Недоступный.
Разместите на форме две кнопки.

• Для первой установите такие значения свойств: Text — Кнопка 1, Enabled — True.
• Для второй соответственно: Text — Кнопка 2, Enabled — False.

Создайте для события Click первой кнопки заготовку обработчика этого события и введите в него такие команды:

• Button2.Enabled :=True;
• Buttonl .Enabled := False;

Создайте для события Click второй кнопки заготовку обработчика этого события и введите в него такие команды:

• Buttonl .Enabled :=True;
• Button2.Enabled := False;

Проанализируйте тексты этих процедур и сделайте вывод, что будет происходить во время исполнения проекта. Исполните проект. По очереди выбирайте доступную кнопку и наблюдайте за результатами. Сохраните проект.

5. Создайте проект, в котором событие MouseMove кнопки вызовет изменение ее размеров, заголовка и положения в окне. Сохраните проект.

6. *. Создайте проект, в котором событие TextChanged поля вызовет изменение его размеров, цвета его фона и появление в поле текста с вашей фамилией и именем символами красного цвета. Сохраните проект.

7. *. Создайте проект, который по длине, ширине и высоте вашей комнаты будет вычислять площадь пола и площадь поверхности стен. Сохраните проект.

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

9. *. Создайте проект, в котором расположите на форме три кнопки. Установите такие значения их свойств, чтобы в начале выполнения проекта первая кнопка была видима и доступна, вторая - видима и недоступна, третья — невидима и недоступна. Для каждой кнопки создайте процедуру для события Click, чтобы:

• выбор первой кнопки делал ее невидимой и недоступной, вторую кнопку - видимой и доступной, третью кнопку - видимой и недоступной;
• выбор второй кнопки делал ее невидимой и недоступной, третью кнопку - видимой и доступной, первую кнопку - видимой и недоступной;
• выбор третьей кнопки делал ее невидимой и недоступной, первую кнопку - видимой и доступной, вторую кнопку - видимой и недоступной.

Сохраните проект.

занятие 13

 вверх

назад


 

• 2017 Февраль