- •ВВЕДЕНИЕ
- •1 ОСНОВЫ ПРОГРАММИРОВАНИЯ НА VBA
- •1.1 Типы данных
- •1.2 Требования к идентификаторам
- •1.3 Приоритет выполнения операций
- •1.4 Встроенные функции
- •1.5 Функции управления процессом выполнения программ
- •1.6 Формирование и обработка массивов
- •1.7 Создание управляющих кнопок
- •2 БАЗОВЫЕ ПОНЯТИЯ ОБЪЕКТНО-ОРИЕНТИРОВАННОГО ПРОГРАММИРОВАНИЯ
- •3 РАЗРАБОТКА ГРАФИЧЕСКОГО ИНТЕРФЕЙСА ПРОГРАММЫ
- •3.1 Интерфейс среды разработки языка VBA
- •3.2 Создание пользовательской формы
- •4 ТРЕБОВАНИЯ К ОФОРМЛЕНИЮ ПОЯСНИТЕЛЬНОЙ ЗАПИСКИ
- •4.1 Структурные элементы пояснительной записки
- •4.2 Оформление элементов пояснительной записки
- •5 ПРИМЕР ВЫПОЛНЕНИЯ ЗАДАНИЯ
- •БИБЛИОГРАФИЧЕСКИЙ СПИСОК
- •ПРИЛОЖЕНИЕ Б ПРИМЕРЫ ОПИСАНИЯ ИСПОЛЬЗОВАННЫХ ИСТОЧНИКОВ
If |
b(i,j) > 0 then |
‘если элемент больше нуля |
k = k + 1 |
‘изменение индекса формируемого массива |
|
a(k) = b(i,j) |
‘перезапись найденного элемента |
|
End If |
|
|
Next j |
|
|
Next i |
|
|
If k = 0 then |
‘если элемент равен нулю |
MsgBox(”Положительных элементов в массиве нет”)
End If
– формирование двумерного массива a из первого, третьего и пятого столбцов массива b размерностью 4 × 6
‘Фрагмент программы
k = 1 ‘начальное значение индекса формируемого массива
For j = 1 to 5 step 2
For i = 1 to 4
a(i,k) = b(i,j) ‘перезапись найденного элемента
Next i
k = k + 1‘изменение индекса формируемого массива
Next i
– взаимозамена данных в 1 и 3 столбцах массива размерностью 4 × 6
‘Фрагмент программы
For i = 1 to 4
c = a(i,1) ‘запись значения из первого столбца в промежуточную
‘переменную
a(i,1) = a(i,3)‘запись в первый столбец элемента из столбца 3 a(i,3) = c ‘запись в третий столбец элемента из столбца 1 Next i
1.7 Создание управляющих кнопок
Для удобства работы с программами рекомендуется создавать управляющие кнопки. Для этого необходимо сделать следующее:
19
1.Добавить на ленту вкладку Разработчик (если она отсутствует) в следую-
щей последовательности: Меню Файл → Параметры → Настройка ленты → Ос-
новные вкладки → Разработчик → ОК.
2.На вкладке Разработчик нажать кнопку Вставить → в блоке Элементы управления формы выбрать элемент Кнопка и растянуть ее левой кнопкой мыши на экране (рисунок 2).
1 – созданная кнопка; 2 – элемент формы для создания кнопки; 3 – вкладка «Разработчик»
Рисунок 2 – Создание кнопки
3.Назначить макрос созданной кнопке. Для этого щелкнуть правой кнопкой
мышки по созданной кнопке и в контекстном меню выбрать пункт Назначить макрос…. В появившемся окне выбрать нужный макрос и нажать ОК.
Для активизации листа в макросе нужно написать команду: Sheets("ЛистN").Select.
Для вызова формы в макросе нужно прописать команду: UserForm1.Show
4.Правой кнопкой мыши отформатировать внешний вид кнопки и изменить надпись на ней.
20