Задание. Выполните упражнения для VBA на языке Basic в OpenOffice.org.
Пример 1
Задача. Создайте макрос на языке Basic в OpenOffice.org.
Ассоциируйте с кнопкой, размещенной на рабочем листе
электронных таблиц Calc, макрос, при запуске которого значение
целочисленной переменной x выводится в окне сообщения.
Скриншот примера
1. Сохраните документ на диске в папке,
например,
для документа в OpenOffice.org Calc
С:\2kurs\mydoc1.ods
2. В главном меню выберите пункт
Сервис\Макросы\Управление макросами\OpenOffice.org Basic...
3. Окне Макросы...
выделите свой сохраненный документ и нажмите на кнопку
Управление...
4. В окне Управление макросами...
перейдите на вкладку Библиотеки
из выпадающего списка Приложение/документ
выберите свой сохраненный документ, например
mydoc1.ods
Создайте новую библиотеку, назовите ее, например
Library1
5. В окне Управление макросами...
перейдите на вкладку Модули
для своего сохраненного документа
mydoc1.ods
выберите библиотеку
Library1,
в которой выберите модуль
Module1.
Нажмите на кнопку Редактировать
6. Создание и настройка кнопки в OpenOffice.org Calc
Примеры макросов на языке Basic в OpenOffice.org
VBA
На листе Excel создайте кнопку. По нажатию на неё выведите 5 окон-сообщений разного типа.
С помощью окна ввода введите длину и ширину прямоугольника. Вычислите площадь и периметр прямоугольника. Результат выведите с помощью окна-сообщения.
С помощью окна ввода введите ребро куба. Вычислите объем и площадь поверхности куба. Результат выведите с помощью окна сообщения.
С помощью окна ввода введите плотность вещества и радиус шара из этого вещества. Вычислите объем и массу шара. Результат выведите с помощью окна-сообщения.
С помощью окна ввода введите радиус цилиндра и его высоту. Вычислите объем цилиндра и площадь торцов. Результат выведите с помощью окна-сообщения.
Создайте форму, разместите на ней текстовое поле, кнопку и 2 метки. По нажатию на кнопку вычислите квадрат и корень квадратный числа, введенного в текстовое поле. Результат выведите в метку.
Создайте форму, разместите на ней 2 текстовых поля, кнопку и метку. По нажатию на кнопку вычислите сумму, разность и произведение чисел, введенных в текстовые поля. результат выведите в метку.
Создайте форму, разместите на ней 2 текстовых поля, кнопку и метку. По нажатию на кнопку вычислите среднее арифметическое и среднее геометрическое чисел, введенных в текстовые поля. Результат выведите с помощью окна-сообщения.
Вычислите значение выражения y=[a]+2*sin(b). Результат выведите с помощью окна-сообщения.
Даны внутренней и внешний радиусы кольца. Вычислите площадь кольца. Результат выведите в метку.
Даны 2 резистора сопротивлением 6 Ом и 4 Ом. Вычислите сопротивление системы при их параллельном и последовательном соединении. Результат выведите с помощью окна-сообщения.
В начальный момент времени скорость автомобиля 1 м/с и ускорения 0,1 м/c^2 через какое время его скорость будет равна 8 м/c?
От начала отсчета времени прошло N секунд. Сколько полных минут, часов и суток прошло с начала отсчета времени?