Читайте также:
|
1. Войти в редактор VBA и выполнить команды Insert → UserForm.
2. Поместить на форму элемент управления MultiPage (Набор страниц), реализующий многостраничные диалоговые окна. Выбрать первый ярлык Page1 и задать его свойству Caption значение Тренд, второму ярлыку задать значение этого свойства Параметры.
3. Поместить на первую страницу следующие элементы управления: 6 надписей: Label1, Label2, Label3, Label4, Label5, Label6, 3 поля: TextBox1, TextBox2, TextBox3, 3 элемента управления RefEdit: RefEdit1, RefEdit2, RefEdit3, а также 2 кнопки CommandButton1, CommandButton2.
4. Перейти на другую страницу и поместить на ней элемент управления Frame1, в котором разместить два переключател OptionButton1, OptionButton2.
5. Задать всем элементам управления свойства в соответствии с рисунками 1 и 2.
6. Перейти в рабочую книгу MS Excel и ввести исходные данные на Листе1 и на Листе2.
7. Записать программный код.
Рис. 1. Диалоговое окно 1
Рис. 2. Диалоговое окно 2
Рис. 3. Исходные данные для расчёта на Листе1 и Листе2
Сначала записываются переменные уровня модуля
Нажатие кнопки ОК запускает на выполнение процедуру CommandButton1_Click(). При выборе переключателя с повторениями производится расчёт по процедуре ТрендсПовторениями, а при выборе переключателя Без повторений – по процедуре Обычныйтренд (первая задача).
Нажатие кнопки Отмена запускает на выполнение процедуру С ommandButton2_Click(), которая закрывает диалоговое окно.
Private Sub CommandButton2_Click()
UserForm1.Hide
Дата добавления: 2015-09-11; просмотров: 95 | Поможем написать вашу работу | Нарушение авторских прав |
|
| <== предыдущая лекция | | | следующая лекция ==> |
| Построение линии тренда | | | End Sub |