06.01.2015 Views

Введение в программирование на VBA - eDrive

Введение в программирование на VBA - eDrive

Введение в программирование на VBA - eDrive

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

54<br />

r = перемен<strong>на</strong>я<br />

End Property<br />

Public Function Площадь () As Double<br />

Площадь = 3.14159 * Радиус ^ 2<br />

End Function<br />

Public Sub Круг ()<br />

Dim маленькийКруг As Class1<br />

Set маленькийКруг = New Class1<br />

маленькийКруг.Радиус = InputBox ("В<strong>в</strong>едите радиус")<br />

MsgBox маленькийКруг.Площадь<br />

Set маленькийКруг = Nothing<br />

End Sub<br />

Визуальное программиро<strong>в</strong>ание<br />

Формы<br />

Для организации диалога с пользо<strong>в</strong>ателем <strong>в</strong> Word и Excel<br />

используются разрабаты<strong>в</strong>аемые программистом а<strong>в</strong>торские объекты —<br />

формы UserForm, которые можно отображать (Show) и скры<strong>в</strong>ать (Hide). У<br />

форм, созда<strong>в</strong>аемых через меню Вста<strong>в</strong>ка .Userform, задаются заголо<strong>в</strong>ки<br />

(Caption), изменяются размеры (Height, Width), тип границы (BorderStyle,<br />

SpecialEffect), фон и изображения (BackColor, Picture), расположение <strong>на</strong><br />

экране (Left, Top) и дополнитель<strong>на</strong>я информация (Tag) через окно С<strong>в</strong>ойст<strong>в</strong>а.<br />

Д<strong>в</strong>ойным щелчком по форме или откры<strong>в</strong>ается ее программный модуль,<br />

<strong>в</strong> котором размещают процедуры, описы<strong>в</strong>ающие реакцию формы <strong>на</strong><br />

различные события: щелчок (Click), д<strong>в</strong>ойной щелчок (DblClick),<br />

акти<strong>в</strong>изацию (Activate) и др.<br />

При <strong>на</strong>ступлении событий можно <strong>в</strong>ызы<strong>в</strong>ать как процедуры-функции,<br />

так и процедуры-подпрограммы, хотя обычно <strong>в</strong>ызы<strong>в</strong>аются последние.<br />

Процедуры, сопоста<strong>в</strong>ляемые событиям, <strong>на</strong>зы<strong>в</strong>ают процедурами обработки<br />

событий, <strong>в</strong> частности подпрограммы именуют обработчиками. Им<br />

а<strong>в</strong>томатически прис<strong>в</strong>аи<strong>в</strong>аются име<strong>на</strong>, состоящие из имени объекта и имени<br />

события, соединенных з<strong>на</strong>ком подчерки<strong>в</strong>ания. А<strong>в</strong>торская процедурафункция<br />

<strong>в</strong>ызы<strong>в</strong>ается как =имяПроцедуры(списокАргументо<strong>в</strong>).<br />

Обращение к форме <strong>в</strong>ыполняется по ее имени (Name), а из класса<br />

формы к ней удобно обращаться через лексему Me.<br />

Примеры<br />

Sub Начало ()<br />

Call С<strong>в</strong>ойст<strong>в</strong>аФормы<br />

End Sub

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!