Строка 1

Начало программы. Отзыв кнопки CommandButton1 на щелчок.

Строки 2-16 - Объявление переменных

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

Строки 17-20 Преобразование данных считанных из текстовых полей в числовые

Поля TextBox при вводе хранят данные символьного типа, т.е. координаты центра окружности и радиус - это символы, но в дальнейшем эти данные должны участвовать в вычислениях, поэтому необходимо преобразовать их в числа, с помощью функции Val и освоить числовые значения переменным X, Y и R.

Строки 21-24 Вычисление значение

В этих строках вычисляются длина окружности - С, площадь круга - S, удаление центра окружности от начала координат - L.

Строки 25-28 Вывод результатов

Вычисленные значения хранятся в числовом формате. Для вывода результатов в текстовые поля преобразуем их в символы, применив функцию преобразования форматов Str.

Строка 29

Конец программы.

Данную программу можно упростить, если объявить все переменные в одной строке, то есть объединить строки со 2-ой по 14-ую в одну.

Dim R As Single, X As Single, Y As Single, С As Single, S As Single, L As Single, Pi As Single

Остальные строки, начиная с 15 по 29 оставить без изменения.

Далее напишите программу для кнопки «Выход». По нажатию на эту кнопку форма должна скрываться с экрана.

Для появления формы на экране на листе Excel создайте кнопку «Окружность». Сохраните выполненное задание.