@Carlos1996

Написать процедуру Sub обработки события Click() для кнопки с именем КнопкаВычислить, выполняющую следующие действия:
1. Выполнить описание переменных, используемых в программе, таких как dblA, dblB, dblC с помощью оператора Dim.
2. С помощью управляющей структуры If-Then выполнить проверку содержимого текстовых полей Text1 и Text2. Если хотя бы одно поле окажется пустым выдать соответствующее сообщение с помощью функции MsgBox и осуществить досрочный выход из процедуры с помощью оператора Exit Sub.
3. Если в эти поля введены числа, то преобразовать их из текстового типа в числовой, применив функцию CDbl() к текстовым полям Text1 и Text2 и присвоив полученные значения переменным dblA, dblB.__
4. Вычислить среднее арифметическое значений этих переменных и присвоить полученное значение переменной dblC.
5. Значение переменной dblC вывести на форму в текстовое поле Text3, присвоив свойству текст текстового поля Text3 значение этой переменной в текстовом формате с помощью функции CStr.

0