- •2. Блок ввода-вывода.
- •3. Логический блок.
- •4 . Блоки начала и конца блок-схем
- •5.Соединительные блоки
- •Однострочный if.
- •Блочный if.
- •Как запустить нашу программу из редактора vbа на выполнение?
- •Как назначить макрос кнопке размещенной на рабочем месте так, чтобы щелчок на этой кнопке заставлял выполнить нужный макрос?
- •Создание собственного кода программы.
- •Первая программа на vba. Воспользуемся третьим сценарием. По пунктам запишем наши действия.
- •Как из окна редактора попасть на рабочий лист?
- •Где хранятся программы?
- •Циклические алгоритмы.
- •Рассмотрим циклы for … next
- •Найти произведение целых чисел от к до м с шагом 2
- •Циклы с условием do … loop
- •Продолжение знакомства с редактором vba
- •Модули и процедуры.
- •Процедура – подпрограмма
- •Процедура – функция
- •Создание процедур-подпрограмм..
- •Процедура подпрограммы.
- •Как вызвать процедуры из других программ?
- •Передача аргументов в подпрограммы(по ссылке и по значению). Способ1 -Передача по ссылке.
- •Способ2.-Передача по значению.
- •Необязательные параметры в подпрограммах.
- •Процедура функция.
- •Объявления переменных и их области видимости
- •Объявление переменных.
- •Область видимости переменной
- •2) Переменная уровня модуля ( уровня контейнера )
- •Работаем с приложением Excel и его объектами.
- •Объектная модель Excel.
- •Объект Application( приложение в целом).
- •Объект Workbook(рабочая книга)
- •Основные методы объекта workbook
- •Объект Worksheet (Рабочий лист).
- •Основные методы объекта worksheet.
- •Основные свойства рабочих листов
- •Объект Range (диапазон)
- •Основные свойства объекта Range
- •7) Font - шрифт
- •Циклы вида With … Еnd With.
- •Пример.
- •Основные методы объекта Range
- •С объектом Selection можно работать точно так, как с объектом Range: те же свойства и те же методы.
- •Функция Format()
- •Еще раз о функциях val, inputbox Функция Val()
- •Функция InputBox().
- •Задача: проверка на «пустоту».
- •Отладка программ (debugging) Виды ошибок:
- •1)Синтаксические;
- •2)Во время выполнения программы;
- •3)Логические.
- •Точки останова(breakpoints).
- •Пошаговое выполнение программы.
- •Работа со справкой.
- •Окно отладки (Immediate).
- •Окно контрольных значений
- •Массивы
- •Нединамические массивы.
- •Динамические массивы.
- •Ввод, вывод одномерных массивов.
- •Введение массива с помощью функции InputBox (ввод «вручную»).
- •2)Введение массива с помощью генератора случайных чисел
- •Вывод массива.
- •1)Вывод массива в окно отладки
- •2)Вывод массива на рабочий лист
- •3)Вывод массива в окно сообщений
- •Пример1. Найти максимальный элемент в массиве
- •Пример2. Сортировка (упорядочивание) одномерного массива.
- •Двумерные массивы (таблицы или матрицы).
- •Ввод /вывод двумерного массива.
- •1)Ввод с помощью функции Input Box (ввод вручную)
- •2)Ввод с помощью генератора случайных чисел
- •Особенности ввода-вывода двумерных массивов на рабочий лист при работе с vba (excel)
- •Ввод массива
- •Вывод массива на рабочий лист.
- •Обращение к массивам при работе с подпрограммами.
- •Vvod b,n,m,k ‘вызов подпрограммы ввода массива
- •Примеры решения задач, связанных с двумерными массивами.
- •Задача1.Найти сумму элементов под побочной диагональю квадратной матрицы размера n×n.
- •Функции, определяющие границы индексов массивов.
- •Элементы визуального программирования.
- •Панель управления «формы» .
- •Экранные формы.
- •Для того, чтобы вставить форму в наше приложение необходимо выполнить команды:
- •Свойства формы.
- •Этапы разработки визуальных программ.
- •2) Написание кода.
- •Первая визуальная программа «Здравствуй ,мир!»
- •Первый этап ( настраивание свойств формы и элементов управления).
- •Второй этап ( написание кода).
- •Как запустить наше приложение из окна редактора vba?
- •Как сделать так, чтобы наша форма запускалась с рабочего листа?
- •Программа “Курс доллара”.
- •События формы.
- •Переключатель (Option Button)
- •Полоса прокрутки (ScrollBar)
- •Пример1. Программа «скорость».
- •Флажок или индикатор (Check Box)
- •Пример 2. «Утоляем жажду».
- •Элемент управления «рисунок» (Image)
- •Элемент управления «список» (ListBox)
- •Поле со списком, или комбинированный список(Combobox)
- •Пример использования.
- •Static – объявление переменной статической.
- •Дополнительные элементы управления.
- •Работа с файлами последовательного доступа
- •Открыть файл последовательного доступа можно в трёх режимах:
- •Открытие файла.
- •Закрытие файла ( оператор close).
- •Формат оператора input:
- •Операторы вывода в файл print и write
- •Формат функции eof
- •Input#1, X ‘считываем очередной элемент массива
- •Литература.
Флажок или индикатор (Check Box)
Предоставляет возможность выбора из нескольких не взаимоисключающих альтернатив. Например, работая с различными настройками, мы можем выбрать одну или несколько из них (подключить – не подключать их к работе).
Основные свойства и их значения
Основные свойства |
Значение |
Name |
Chk имя |
Caption |
Аналогично переключателю |
Value |
Аналогично переключателю |
Triple State |
Тройное состояние, позволяет сделать выбор из 2х или 3х альтернатив: Если значение FALSE – выбор из 2х альтернатив в свойстве Value – TRUE или FALSE. Если значение TRUE – выбор из 3х альтернатив в свойстве Value: а) пусто; б) TRUE; в) FALSE. |
Основные события:
Сlick |
Щелчок на флажке |
Сhange |
Изменение состояния флажка |
Полоса прокрутки (ScrollBar)
Полоса прокрутки предназначена для установки числового целочисленного значения из некоторого заданного целочисленного диапазона. В качестве начала и конца могут браться целые числа от -32768 до +32767.
Основные свойства и их значения
Основные свойства |
Значения |
Name |
scr имя. |
Value |
возвращает или устанавливает текущее значение полосы прокрутки. Соответствует положению бегунка |
Min |
минимальное значение полосы. |
Max |
максимальное значение полосы. |
Small change |
устанавливает шаг изменения при щелчке на одной из стрелок полосы прокрутки. |
Large сhange |
устанавливает шаг изменения при щелчке между ползунком и одной из стрелок. |
Orientation |
авто(-1) по расположению во время проектирования (0)-вертикальная полоса (+1) - горизонтальная. полоса |
Основные события.
Сhange |
изменение. |
Scroll |
прокрутка. |
Разница в данных событиях в том, что событие - сhange – наступает, когда «отпустили» бегунок, а scroll– когда тянем бегунок.
Элемент управления Счётчик(SpinButton) – по сути, полоса прокрутки без бегунка. Свойства счётчика аналогичны свойствам полосы прокрутки(Value, Min, Max, Small change,). Основное событие сhange
Пример1. Программа «скорость».
При запуске программы должно появиться окно вида:
Программа «скорость» показывает как работать с полосой прокрутки и переключателями. При движении ползунка скорость может меняться от 0 до 100 км/час. Если переключатель стоит в положении «миль/час», то скорость пересчитывается милях в час (1 миля = 1,6 км)
Таблица основных объектов, их свойств и значений.
Объект |
Свойство |
значение |
Форма |
Name Caption |
Frmspeed Программа «Скорость» |
Кнопка |
Name Caption |
Cmdexit выход |
Полоса прокрутки |
Name min max value smallchange largechange |
Scrspeed 0 100 50 1 10 |
Поле |
Name text |
Txtspeed 50км/час |
Переключатель |
Name Caption value |
Optkm км/час True |
Переключатель |
Name Caption value |
Optmile миль/час False |
Занесем на форму все указанные элементы управления, изменив свойства объектов соответственно таблице свойств.
Пишем коды программ.
‘Щелчок на кнопке «выход».
Private Sub cmd Exit_Click
End
End Sub
‘Щелчок на переключателе «км/час»
Private Sub optkm_click()
‘информация берётся из свойства value
‘объекта полоса прокрутки Scrspeed
txtspeed.text=scrspeed.value & “км/час”
End sub
‘Щелчок на переключателе «миль/час»
Private Sub optmile_click()
‘информация берётся из свойства value
‘объекта полоса прокрутки Scrspeed
txtspeed.text=(scrspeed.value/1.6) & “км/час”
End sub
‘Работаем с полосой прокрутки
‘Событие – изменение положения бегунка или щелчок на кнопке изменения положения
‘Private Sub scrspeed_change()
If optkm.value = True Then
txtspeed.text=scrspeed.value & “км/час”
else
txtspeed.text=(scrspeed.value/1.6) & “км/час”
End Sub
‘ Событие «движение(прокрутка) бегунка»
‘Private Sub scrspeed_Scroll()
‘вызов процедуры scrspeed_change
scrspeed_change
End Sub
