---

——————————

Шаг 2. Код для формы калькулятора

Дважды кликните по форме или нажмите F7, чтобы открыть окно кода, полностью сотрите всё, что там есть, и вставьте следующий чистый и исправленный код:

' 1. Кнопка умножения "*"
Private Sub CommandButton1_Click()
    ' Используем Val(), чтобы избежать ошибок при расчете дробных чисел и пустых полей
    z.Text = Val(x.Text) * Val(y.Text)
End Sub

' 2. Кнопка вычитания "-"
Private Sub CommandButton2_Click()
    z.Text = Val(x.Text) - Val(y.Text)
End Sub

' 3. Кнопка "Сброс"
Private Sub CommandButton3_Click()
    x.Text = ""
    y.Text = ""
    z.Text = ""
End Sub

' 4. Кнопка "Выход"
Private Sub CommandButton4_Click()
    Unload Me ' Выгружает форму из памяти и закрывает её
End Sub

Примечание: в методичке написан упрощенный код z = x * y, но на практике в VBA лучше обращаться к свойствам .Text и использовать функцию Val(), чтобы программа не выдавала ошибку при случайном нажатии на кнопку с пустыми полями.

——————————

Ответы на контрольные вопросы (для защиты лабораторной)

1. 

Как двумя способами можно организовать закрытие диалогового окна?

   * Способ 1: Программный — с помощью команды Unload Me (выгрузить форму из памяти) или UserForm1.Hide (просто скрыть с экрана).

   * Способ 2: Интерактивный — нажатием на стандартный системный крестик [X] в правом верхнем углу формы.

2. 

Каково назначение свойства объекта Caption?

   * Это свойство отвечает за отображение текстового заголовка элемента на экране (например, надпись на кнопке, текст внутри метки Label или название в шапке окна формы).

3. 

Каково назначение свойства объекта Font?

   * Позволяет настраивать параметры шрифта текста: выбирать семейство шрифта, его размер (кегль), начертание (жирный, курсив, подчеркнутый).

4. 

Каково назначение свойства объекта Text Align?

   * Отвечает за выравнивание текста внутри элемента управления (по левому краю, по центру или по правому краю).

-----
0.436375 ₽ · /balance_help