End Sub. Результат работы программного кода при значении координат x=0.5 и y=0.5 показан на рисунках 10, 11, 12Результат работы программного кода при значении координат x=0.5 и y=0.5 показан на рисунках 10, 11, 12.
Рис. 10. Диалоговое окно ввода координаты x – результат использования функции InputBox(" Введите координату x”)
Рис. 11. Диалоговое окно ввода координаты y – результат использования функции InputBox(" Введите координату y")
Рис. 12. Результаты работы программного кода в диалоговом окне сообщений (MsgBox)
Протестируйте остальные ветви алгоритма, введя соответствующие значения исходных данных. Теперь рассмотрим пример разработки программного кода того же примера, используя объектно ориентированное программирование, реализуемое средствами языка VBA, используя экранные формы. Форма и расположение на ней элементов управления после задания новых свойств этим элементам представлена на рисунке 13.
Рис. 13. Форма и расположение на ней элементов управления
Программный код Private Sub Cmd_Click()
|
