Файл: regeda_v_v_regeda_o_n_osnovy_programmirovaniya_na_vba.pdf

ВУЗ: Не указан

Категория: Не указан

Дисциплина: Не указана

Добавлен: 02.12.2019

Просмотров: 3115

Скачиваний: 1

ВНИМАНИЕ! Если данный файл нарушает Ваши авторские права, то обязательно сообщите нам.
background image

ПРИЛОЖЕНИЕ

 3.  

Таблица

 

П

3.1. 

Наиболее

 

часто

 

используемые

 

методы

 

формы

 

Метод

 

Описание

 

Show 

Отображает

 

форму

 

на

 

экране

 

Hide 

Закрывает

 

форму

 

Move 

Изменяет

 

местоположение

 

и

 

размер

 

формы

 

PrintForm 

Печатает

 

изображение

 

формы

 

Таблица

 

П

3.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

 

обычно

 

не

 

используются

Print 

Отображает

 

в

 

форме

 

строку

 

текста

Синтаксис

:  

Print

 

Строка

 


background image

Продолжение

 

табл

П

3.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

 – 

задает

 

в

 

эллипсе

 

отношение

 

длины

 

вертикальной

 

оси

 

к

 

длине

 

горизонтальной

 


background image

Продолжение

 

табл

П

3.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

 

игнорирует

 

код

написанный

 

в

 

процедурах

обрабатывающих

 

перечисленные

 

события

 


background image

Таблица

П

3.4 

Некоторые

 

общие

 

для

 

форм

 

и

 

элементов

 

управления

 

события

 

Событие

 

Описание

 

Initilize 

Происходит

 

во

 

время

 

конфигурирования

 

формы

но

 

до

 

ее

 

загрузки

 

Load 

Происходит

 

после

 

инициализации

 

формы

но

 

до

 

ее

 

отобра

-

жения

 

на

 

экран

 

Unload 

Событие

 

противоположное

 

Load

Обычно

 

используется

 

для

 

того

чтобы

 

уточнить

действительно

 

ли

 

пользователь

 

жела

-

ет

 

закрыть

 

форму

 

QueryUnload

Событие

происходящее

 

перед

 

событием

 

Unload

Также

 

используется

 

для

 

того

чтобы

 

создать

 

запрос

 

у

 

пользовате

-

ля

действительно

 

ли

 

он

 

хочет

 

закрыть

 

окно

 

Terminate 

Происходит

 

при

 

закрытии

 

формы

 

Click 
DbClick 

Происходят

 

при

 

щелчке

 

и

 

двойном

 

щелчке

 

в

 

форме

 

MouseDown 
MouseUp 

Происходят

 

при

 

нажатии

 

кнопки

 

мыши

 

и

 

ее

 

отпускании

 

KeyDown 
KeyUp 

Происходят

 

при

 

нажатии

 

и

 

отпускании

 

клавиши

 

Activate 
Deactivate 

Происходят

 

при

 

активизации

 

и

 

деактивизации

 

формы

  

Resize 

Происходит

 

при

 

изменении

 

размеров

 

формы

Обычно

 

ис

-

пользуется

 

для

 

переопределения

 

размеров

 

элементов

 

управления

 

при

 

изменении

 

размеров

 

формы

 

так

чтобы

 

со

-

хранить

 

пропорцию

 

их

 

размеров

 

и

 

местоположение

 

 
 
 
 
 
 
 


background image

ПРИЛОЖЕНИЕ

 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

 

до

 

с

 

шагом

 

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