Работа с объектами в приложениях MicroSoft Office
Курсовой проект - Компьютеры, программирование
Другие курсовые по предмету Компьютеры, программирование
?обытия происходят в результате действия пользователя или выполнения программного кода, а также вызываются системой. Код, который сигнализирует о событии, называется вызывающим событие, а код, который реагирует на это событие, называется обрабатывающим.
Формы и их модули
Модули формы (расширение .FRM) - основа большинства приложений Visual Basic. Они могут содержать процедуры, которые обрабатывают события, общие процедуры и объявления переменных, констант, типов и внешних процедур на уровне формы. Если мы посмотрим на модуль формы в редакторе текста, то увидим описание формы и ее элементов управления, включая параметры настройки свойств. Код, который записан в модуле формы, определен для того приложения, которому принадлежит форма. Она может также ссылаться на другие формы или объекты этого приложения.
Различают модули двух типов: стандартные модули и модули класса.
Стандартные модули (модули программного кода) представляют собой именованные контейнеры, в которых содержатся переменные, доступные различным процедурам и функциям (общие переменные) и программные единицы (процедуры и функции), не связанные с конкретными объектами.
Модули класса представляют собой именованные контейнеры, содержащие в себе описания созданного пользователем класса объектов. Описанные в них переменные определяют внутреннюю структуру объектов - экземпляров этого класса, а процедуры являются методами этих объектов. Можно записывать код в модулях класса, чтобы создать новые объекты. Эти новые объекты могут включать лично настроенные свойства и методы. Можно сказать что, формы - это тоже модули класса, только они могут иметь элементы управления, помещенные в них, и могут отображать окна формы.
Модуль формы может содержать:
Объявления. Можно размещать константу, тип, переменную, и объявления процедуры динамически компонуемой библиотеки (DLL) на уровне модулей формы, класса или стандартных модулей.
Процедуры. Процедуры Sub, Function или Property содержат части кода, который может быть выполнен как модуль.
Титульный лист к курсовой работе
Титул к курсовой работе создаётся на основе свойств и методов рабочего листа.
Код программы:
Private Sub Титул1()
With Range("B3:P43")
.HorizontalAlignment = xlCenter
.VerticalAlignment = xlCenter
.WrapText = True
.MergeCells = True
.Font.Italic = True
.Font.Size = 14
.Value = "Путилова Таисия Евгеньевна 2-MD-11 Проект создания коттеджного поселка"
.Interior.ColorIndex = 24("B3:P43").BorderAround ColorIndex:=3, Weight:=xlThick
End WithSub
Создание Титула на рабочем листе с помощью процедур обработки событий в UserForm
Порядок работы:
Открыть созданную ранее рабочую книгу.
В проводнике Project Explorer выполнить правой кнопкой мыши ЭтаКнига>Insert> UserForm.
В появившийся макет формы внедрить кнопку ComandButton1, ComandButton2, Image1, применив к ним свойства Caption, Font, BackColor в открытом окне Properties Windows(см. Панель инструментов или кн. F4).
Двойным Click по кнопкам создать шаблоны для процедур обработки событий. В первую процедуру скопировать программный код ранее созданного диапазона в рабочем листе Титул. В нее же включить для Image1 следующие значения свойств:
Код программы:Sub CommandButton1_Click()Image1
.Visible = True
.PictureSizeMode = fmPictureSizeModeZoom
.PictureAlignment = fmPictureAlignmentTopLeft
.BorderStyle = fmBorderStyleSingle
.BackColor = RGB(100, 310, 0)
.Picture = LoadPicture("P:\2-MD-11\ПутиловаТЕ\вычисл\DSC_1129.jpg")
End With("C2").Value = "Путилова Таисия Евгеньевна 2-мд-11 Проект создания коттеджного поселка "
With Range("C2:K21")
.MergeCells = True
.Font.Size = 40
.Name = "Tahoma"
.Interior.ColorIndex = 50
.Font.ColorIndex = 7
.HorizontalAlignment = xlCenter
.VerticalAlignment = xlCenter
.WrapText = TrueSubPrivate Sub CommandButton2_Click().HideSubSub Image1_Click() With
End Sub
Определение диапазона для создания таблицы - протокола и создание заголовка таблицы
Порядок работы:
- Определелить диапазон на рабочем листе с именем Протокол для создания таблицы - протокола в соответствии с генеральным списком полей в задании.
Создать форму : Project Explorer>ЭтаКнига >Insert>UserForm. Внедрить в форму две кнопки с указанными надписями.
Создать две процедуры обработки событий двойным Click по каждой из кнопок. В первую процедуру включить свойства и методы для выбранного вами диапазона. В процедуру обработки событий по первой кнопке целесообразно включить ввод наименования каждого поля в ячейки строки с помощью функции InputBox("Ввести наименование поля") в цикле, параметрами которого будут ссылки на номера столбцов выбранного диапвзона.
Создать процедуру инициализации для открытия формы: Sub UserForm_Initialize().ShowSub
Заполнить строку наименования полей таблицы с применением необходимых свойств и методов для указанного диапазона. В примере(см. ниже) выбран диапазон B2:К23, в котором будет располагаться протокол - таблица, со строкой 2 в диапазоне B2:К2 для заголовков.
Код программы:
Private Sub CommandButton1_Click()("B2:K2").Clear("B2:K2").BorderAround Weight:=xlThick("B2:K2").VerticalAlignment = xlCenter("B2:K2").HorizontalAlignment = xlCenterRange("B2:K2")
ActiveSheet
.WrapText = TrueWithi = 2 To 11(2, i).Value = InputBox("Ввести наименование поля")
Next iSubSub CommandButton2_Click()2.Hide
End Sub
Создание формы по заполнению таблицы
Порядок работы:
- Создать форму указанным ранее способом.
Внедрить в форму текстовые поля(TextBox), Label(метки), кнопки(см. ниже)
Заполнить/добавить таблицу значениями по полям. При обращении к каждому полю необходима проверка на пусто в начальной ячейке строки. Это выполняет следующий фрагмент процедуры в процеду?/p>