Лабораторная работа Работа с объектами
Переменные типа объект наряду со значениями хранят также свойства и методы. Большинство объектов представляют собой совершенно абстрактные вещи и могут создаваться только программным способом. Перед тем как проводить с объектом какие-либо манипуляции, его нужно создать.
Создайте форму, например, фКлиент. Вот пример кода VBA, в котором создается новый объект — экземпляр формы фКлиент.
Если запустить на выполнение эту программу, откроется экземпляр формы фКлиент и окно сообщения. Если щелкнуть на кнопке ОК, как окно сообщения, так и сама форма закроются.
Текст процедуры начинается с объявления переменной объекта с именем ф. Эта переменная имеет тип Form_фКлиент. В Access для каждой формы создается свой класс, носящий название Form_ИмяФормы.
По умолчанию в Access все создаваемые формы изначально являются скрытыми (т.е. невидимыми). В следующей строке процедуры свойству видимости Visible присваивается значение True, что приводит к отображению формы на экране.
Далее в программе следует инструкция MsgBox, отображающая окно сообщения. Не забывайте, что при открытии окна сообщения выполнение программы приостанавливается до тех пор, пока пользователь на него не отреагирует нажатием какой-либо кнопки.
После щелчка на кнопке ОК форма с экрана исчезает. Это происходит потому, что интерпретатор VBA уничтожил все переменные, объявленные в процедуре, после ее завершения. После того как переменная ф уничтожена, отображение соответствующей формы на экране прекращается.
Чтение и установка свойств
Свойства объекта описывают его текущее состояние. При создании объекта из класса всем его свойствам присваиваются некоторые значения. Программным путем можно извлечь значения всех свойств объекта, а также присвоить им новые. Вот пример процедуры, извлекающей текущие значения свойств объекта формы:
Если запустить эту процедуру в окне Immediate, на экран будет выведено следующее:
Для чтения значения любого свойства объекта нужно обратиться к имени объекта, дополненному через точку именем свойства:
имя_объекта .имя_свойства
Эту переменную можно использовать для извлечения и присвоения значения, а также для передачи аргумента некоторой процедуре.
В данном случае а полоса перехода между записями (свойство RecordSelectors), расположенная на левой границе окна, включена.
Для изменения свойства ему просто нужно присвоить новое значение, используя очень похожий синтаксис:
Вызов методов
Действия, которые может выполнять объект, называют его методами. Для вызова метода используется синтаксис, аналогичный установке свойств объекта. Имя метода отделяется от имени объекта символом точки. Вот пример вызова некоторых методов формы:
В этой процедуре вызывается метод Move (Перемещение) класса Form. Методы могут иметь свои аргументы, следующие при вызове после их названия, и разделенные запятыми. В данном случае при вызове метода Move было передано четыре аргумента:
первый аргумент указывает на новое положение верхнего левого угла окна по горизонтали (относительно верхнего левого угла рабочей области Access);
второй аргумент указывает на новое положение верхнего левого угла окна по вертикали (также относительно верхнего левого угла рабочей области Access);
третий и четвертый аргументы содержат новые ширину и высоту формы соответственно.
На рис показан результат запуска процедуры Метод. Окно формы сдвинулось к верхнему левому углу рабочей области приложения, а ее высота и ширина уменьшились.