Файл: regeda_v_v_regeda_o_n_osnovy_programmirovaniya_na_vba.pdf
ВУЗ: Не указан
Категория: Не указан
Дисциплина: Не указана
Добавлен: 02.12.2019
Просмотров: 3186
Скачиваний: 1
ПРИЛОЖЕНИЕ
3.
Таблица
П
3.1.
Наиболее
часто
используемые
методы
формы
Метод
Описание
Show
Отображает
форму
на
экране
Hide
Закрывает
форму
Move
Изменяет
местоположение
и
размер
формы
PrintForm
Печатает
изображение
формы
Таблица
П
3.2.
Методы
,
позволяющие
строить
графические
изображения
в
форме
Метод
Описание
1
2
CIs
Очищает
форму
,
закрашивая
ее
цветом
фона
,
т
.
е
.
цветом
задан
-
ным
свойством
BackColor
.
Paint-
Picture
Выводит
изображение
в
определенной
области
формы
.
Синтак
-
сис
:
PaintPicture picture, xl, yl, widthl,_
height1, y2, width2, height2, opcode
•
Picture
–
источник
графического
изображения
,
которое
должно
быть
размещено
в
форме
;
•
xl
,
yl
–
координаты
левого
верхнего
угла
,
где
будет
распола
-
гаться
рисунок
;
•
widthl
,
height1
–
ширина
и
высота
рисунка
;
•
х
2
,
у
2
и
width2
,
height2
–
задают
координаты
левого
верхнего
угла
и
ширину
и
высоту
той
части
источника
графи
-
ческого
изображения
,
заданного
параметром
Picture,
которая
будет
размещена
в
форме
;
•
opcode
–
задает
тип
побитового
смешивания
размещаемого
и
уже
,
возможно
,
существующего
изображения
.
Как
правило
,
на
форме
размещается
все
изображение
,
заданное
параметром
Picture
,
поэтому
параметры
х
2
,
у
2
и
width2
,
height2
обычно
не
используются
.
Отображает
в
форме
строку
текста
.
Синтаксис
:
Строка
Продолжение
табл
.
П
3.2
1
2
Scale
Устанавливает
в
форме
систему
координат
.
Синтаксис
:
Scale (xl, yl) - (
х
2,
у
2)
,
где
(
xl, yl
)
и
(
х
2,
у
2
) –
новые
координаты
левого
верхнего
и
правого
нижнего
угла
формы
.
Для
того
чтобы
вернуться
в
масштаб
,
используемый
по
умол
-
чанию
,
надо
применить
метод
Scale
без
параметров
.
PSet
Создает
точку
заданного
цвета
.
Синтаксис
:
PSet [Step] (x,
у
), [color]
•
(
х
,
у
) –
абсолютные
координаты
точки
(
когда
ключевое
слово
step
не
используется
)
и
относительные
координаты
точ
-
ки
(
в
противном
случае
);
•
color
–
задает
цвет
точки
;
если
этот
параметр
опущен
,
то
цвет
устанавливается
равный
цвету
заданным
свойством
ForeGround
.
Point
Возвращает
цвет
в
определенной
точке
.
Синтаксис
:
Point(
х
,
у
)
Circle
Рисует
окружность
,
дугу
или
эллипс
заданного
цвета
.
Синтаксис
:
Circle [Step] (
х
,
у
), radius, [color,_ start,
end, aspect]
• (
х
,
у
) –
абсолютные
координаты
центра
(
когда
ключевое
слово
step
не
используется
)
и
относительные
координаты
цен
-
тра
(
в
противном
случае
);
•
radius
–
радиус
;
•
color–
задает
цвет
точки
;
если
этот
параметр
опущен
,
то
цвет
устанавливается
равный
цвету
заданным
свойством
Back-
Color
;
•
start
и
end
–
углы
в
радианах
,
задающие
начало
и
конец
дуги
,
если
рисуется
не
окружность
,
а
дуга
;
•
aspect
–
задает
в
эллипсе
отношение
длины
вертикальной
оси
к
длине
горизонтальной
.
Продолжение
табл
.
П
3.2
1
2
Line
Рисует
линию
или
прямоугольник
заданного
цвета
.
Синтаксис
:
Line [Step](xl,yl)–[Step](x2,y2),[color],
[B[F]]
•
(
xl, yl
)
и
(
х
2,
у
2
) –
абсолютные
координаты
точек
,
кото
-
рые
соединяет
линия
(
когда
ключевое
слово
step
не
использу
-
ется
)
и
относительные
координаты
точки
или
точек
(
в
про
-
тивном
случае
).
Если
первая
точка
опущена
,
то
линия
рисует
-
ся
от
текущей
точки
ко
второй
точке
;
•
color
–
задает
цвет
точки
;
если
этот
параметр
опущен
,
то
цвет
устанавливается
равный
цвету
заданным
свойством
BackColor
;
•
В
–
вместо
линии
вычерчивается
прямоугольник
с
противопо
-
ложными
углами
в
заданных
точках
;
цвет
и
стиль
закрашива
-
ния
прямоугольника
задается
свойствами
Filistyle
и
FillColor
;
•
BF
–
прямоугольник
закрашивается
цветом
заданным
свойст
-
вом
BackColor
,
игнорируя
установки
свойств
Filistyle
и
FillColor
.
При
работе
с
формами
особое
место
занимают
следующие
три
инст
-
рукции
(
Табл
.
П
3.3),
которые
управляют
процессами
начала
и
завершения
работы
с
формой
.
Таблица
П
3.3.
Инструкция
Описание
Load
Загружает
форму
или
элемент
управления
в
память
.
Синтаксис
:
Load object
Unload
Выгружает
форму
или
элемент
управления
с
экрана
и
из
памя
-
ти
.
Синтаксис
:
Unload object
End
Завершает
выполнение
кода
без
генерации
событий
Unload-
QueryUnload
или
Terminate
.
Поэтому
завершение
работы
приложения
по
инструкции
End
игнорирует
код
,
написанный
в
процедурах
,
обрабатывающих
перечисленные
события
.
Таблица
.
П
3.4
Некоторые
общие
для
форм
и
элементов
управления
события
Событие
Описание
Initilize
Происходит
во
время
конфигурирования
формы
,
но
до
ее
загрузки
Load
Происходит
после
инициализации
формы
,
но
до
ее
отобра
-
жения
на
экран
Unload
Событие
противоположное
Load
.
Обычно
используется
для
того
,
чтобы
уточнить
,
действительно
ли
пользователь
жела
-
ет
закрыть
форму
QueryUnload
Событие
,
происходящее
перед
событием
Unload
.
Также
используется
для
того
,
чтобы
создать
запрос
у
пользовате
-
ля
,
действительно
ли
он
хочет
закрыть
окно
Terminate
Происходит
при
закрытии
формы
Click
DbClick
Происходят
при
щелчке
и
двойном
щелчке
в
форме
MouseDown
MouseUp
Происходят
при
нажатии
кнопки
мыши
и
ее
отпускании
KeyDown
KeyUp
Происходят
при
нажатии
и
отпускании
клавиши
Activate
Deactivate
Происходят
при
активизации
и
деактивизации
формы
Resize
Происходит
при
изменении
размеров
формы
.
Обычно
ис
-
пользуется
для
переопределения
размеров
элементов
управления
при
изменении
размеров
формы
так
,
чтобы
со
-
хранить
пропорцию
их
размеров
и
местоположение
ПРИЛОЖЕНИЕ
4.
Варианты
заданий
к
лабораторным
работам
по
курсу
"
Информатика
"
на
тему
ОСНОВЫ
ПРОГРАММИРОВАНИЯ
НА
VBA
Разработать
алгоритм
решения
задачи
и
реализовать
этот
алгоритм
в
среде
VBA.
ВАРИАНТ
1
Найти
минимальное
значение
радиуса
шара
R
(
изменяется
от
r1
до
r2
с
шагом
k
)
и
соответствующее
значение
радиуса
основания
r4
,
вырезанного
из
этого
шара
шарового
сегмента
,
для
которых
объем
шарового
сегмента
не
меньше
объема
шара
радиуса
r3
.
Высота
шарового
сегмента
h
остается
неизменной
.
Используя
процедуру
решить
задачу
для
всех
вариантов
усло
-
вий
.
r1 R2 k r3 h
19,3
0,7
-0,1
0,9
0,3
33,6
20,5
-0,1
13,7
12,6
11,1
3,3
-0,1
3,3
2,4
15,9
8,2
-0,1
7,2
7,6
2,54
1,09
-0,01
0,6
0,37
ВАРИАНТ
2
Найти
минимальное
значение
высоты
усеченного
прямого
конуса
h1
(
из
-
меняется
от
l
до
n
с
шагом
m
)
и
соответствующее
значения
высоты
h2
и
образующей
прямого
конуса
s
,
для
которых
объем
усеченного
прямого
ко
-
нуса
не
меньше
объема
куба
со
стороной
a.
Радиус
верхнего
основания
r1
и
радиус
нижнего
основания
r2
усеченного
прямого
конуса
остаются
не
-
изменными
.
Используя
процедуру
решить
задачу
для
всех
вариантов
усло
-
вий
.
l n m a r1 r2
12,6 0,3 -0,1 2,7 1,2 3,9
16,9
4,1
-0,1
22,3
12,8
18,5
1,9
0,3
-0,01
1,1
0,36
0,98
7,2 3,9 -0,1 9,9 5,2 11,3
3,2 0,4 -0,1 3,3 2,4 6,2