Основные свойства, методы и события объекта UserControl

Создание файлов и добавления данных с помощью File System Objects

Первый шаг должен создать объект FileSystemObject, чтобы работать с ним. Вы можете сделать это двумя способами: Объявить переменную, как объект:

Используя метод CreateObject создать объект FileSystemObject:

Обратите внимание, что первый метод работает только в Visual Basic, в то время, как второй метод работает и в Visual Basic и в VBScript.

Вызов, существующих Drives (Дисководов), Files (Файлов) и Folders (Папок)

Чтобы получить доступ к существующему дисководу, файлу или папке, используется соответствующий метод "Get" объекта FileSystemObject:

Например:
Dim fso As New FileSystemObject, fil As File
Set fil = fso.GetFile("c:\test.txt")

Имеются три способа создать последовательный текстовый файл (иногда упоминаемый как "текстовый поток"). Один путь состоит в том, чтобы использовать метод CreateTextFile. Создаем пустой текстовый файл:

Dim fso As New FileSystemObject, fil As File
Set fil = fso.CreateTextFile("c:\testfile.txt", True)

Обратите внимание, что модель объекта FSO еще не поддерживает создание произвольных (random) или двоичных (binary) файлов.
Другой путь состоит в том, чтобы использовать метод OpenTextFile объекта FileSystemObject с установкой флага ForWriting:

Dim fso As New FileSystemObject, ts As New TextStream
Set ts = fso.OpenTextFile("c:\test.txt", ForWriting)

Или Вы можете использовать метод OpenAsTextStream с установкой флага ForWriting:

Dim fso As New FileSystemObject, fil As File, ts As TextStream
Set fso = CreateObject("Scripting.FileSystemObject")
fso.CreateTextFile ("test1.txt")
Set fil = fso.GetFile("test1.txt")
Set ts = fil.OpenAsTextStream(ForWriting)

Модуль UserControl является базовым объектом для создания специализированных элементов управления, подобно объекту Form. Любой элемент управления, созданный с помощью Visual Basic, обязательно включает в свой состав UserControl. В пределах его визуального интерфейса могут размещаться интерфейсы других элементов, называемых в таком случае составляющими.

Разработчик обладает всей полнотой контроля над программным интерфейсом элемента управления и может добавлять в него по мере надобности дополнительные свойства, генерируемые события и методы. Проще всего это делается с помощью Мастера – надстройки Control Interface Wizard. Control Interface Wizard проводит пользователя через последовательность шагов, состоящих в добавлении тех или иных свойств, событий и методов, называемых собирательно членами класса. После того как сделан выбор по всем пунктам, мастер автоматически образует необходимые переменные уровня модуля, объявления событий и процедуры Property Let и Property Get для каждого свойства.У объекта UserControl (как Вы помните, это тот самый объект, на котором мы рисуем наш ActiveX-элемент) есть два специальных метода: WriteProperties и ReadProperties. Как ясно из их названия, они предназначены для записи и для чтения свойств. Спрашивается, куда и откуда? Ответ содержится в параметрах этим методов, а именно в методе WriteProperties свойства записываются в переменную PropBag типа PropertyBag, а в методе ReadProperties - свойства читаются из этого самого PropBag. Почему же их в этот самый PropBag надо записывать и потом читать? Зачем все эти сложности? Для ответа вспомним, что происходит с нашим ActiveX-элементом, сколько раз и когда он рождается и умирает.

Действия программиста	Что происходит с экземпляром ActiveX-элемента
Размещение ActiveX-элемента на форме (путём двойного щелчка на панели элементов).	1.Вызывается метод Initialize. 2.Вызывается метод InitProperties (в нем, как правило, устанавливаются стандартные начальные значения для ActiveX-элемента). 3.Создаётся экземпляр ActiveX-элемента времени разработки.
Установка программистом своих значений свойств для ActiveX-элемента	Для созданного на предыдущем шаге экземпляра ActiveX-элемента изменяются свойства.
Запуск программы в среде Visual Basic'а.	1.Вызывается метод WriteProperties, который запишет новые свойства ActiveX-элемента, заданные программистом на предыдущем этапе, в объект PropBag типа PropertyBag. 2.Старый экземпляр ActiveX-элемента (тот, который был создан на этапе разработки нашим программистом) умирает.
Запущенная программа появляется на экране.	1.Создается новый экземпляр ActiveX-элемента. 2.Вызывается метод Initialize для нового экземпляра ActiveX'а. 3.Новый экземпляр ActiveX-элемента берёт свои свойства из объекта PropBag типа PropertyBag (таким образом этот новый экземпляр получает именно те значения свойств, которые были заданы программистом) путем вызова метода ReadProperties.
При работе программы возможно изменение свойств нашего ActiveX-элемента в результате действий пользователя или самой программы.	Свойства ActiveX-элемента изменяются на какие-то другие.
Закрытие программы.	Экземпляр, созданный на этапе запуска программы, уничтожается. Новые значения свойств никуда не сохраняются.
Возврат к этапу разработки программы.	1.Вызывается метод Initialize для нового экземпляра ActiveX'а. 2.Путем вызова метода ReadProperties новый экземпляр ActiveX-элемента берёт свои свойства из объекта PropBag типа PropertyBag (таким образом этот новый экземпляр получает именно те значения свойств, которые были заданы на этапе разработки программистом).

21-25.Элемент управления CommonDialog для создания диалоговых окон

Все диалоговые окна, перечисленные в начале раздела "Диалоговые окна", можно создать с помощью элемента управления commonDialog. Прежде чем его использовать, необходимо подключить к проекту библиотеку Microsoft Common Dialog Control 6.0 через диалоговое окно Components (Компоненты) среды проектирования.

Для вызова диалоговых окон необходимо использовать соответствующие каждому из этих окон методы элемента управления commonDialog, указанные в табл. 7.11.

Таблица 7.11. Методы элемента управления CommonDialoq

Метод	Описание
ShowOpen	Вызывает диалоговое окно, используемое для открытия файла
ShowSave	Вызывает диалоговое окно, используемое для сохранения файла
ShowColor	Вызывает диалоговое окно настройки цветовой палитры
ShowFont	Вызывает диалоговое окно настройки шрифтов текста
ShowPrinter	Вызывает диалоговое окно настройки печати и диалоговое окно печати
ShowHelp	Подключает справочную систему в стиле Windows

Для изучения диалоговых окон, образуемых с помощью элемента управления CommonDialog, создадим небольшой проект. Выполните следующие действия:

1. Создайте новый стандартный проект. Для этого в меню File (Файл) выберите команду New Project (Создать новый) и в открывшемся диалоговом окне дважды щелкните мышью на значке Standard EXE.

2. Присвойте проекту имя MySmallProject. Для этого откройте окно свойств проекта, выбрав команду Project1 Properties (Свойства Project 1) меню Project (Проект). После переименования проекта эта команда примет вид MySmallProject Properties (Свойства MySmallProject).

3. Подключите к проекту библиотеку Microsoft Common Dialog Control 6.0. Для этого в меню Project (Проект) выберите команду Components, в открывшемся диалоговом окне Components (Компоненты) установите флажок, расположенный рядом с названием этой библиотеки, и нажмите кнопку ОК.

4. Задайте наименование формы проекта FormForControlCommDiaiog.

5. Используя свойство caption формы, введите заголовок окна Форма для проверки диалогов CommonDialog.

6. Добавьте в форму элемент управления CommonDialog, дважды щелкнув мышью кнопку CommonDialog на панели элементов управления. Если эта панель отсутствует на экране, то в меню View (Вид) выберите команду TooIBox (Панель инструментов).

7. Присвойте элементу управления CommonDialog наименование cdMyDialog.

8. Добавьте в форму кнопку управления типа commandButton и назовите ее cbControl. Эта кнопка будет использоваться нами для вызова диалогового окна по событию click.

9. Используя свойство caption, введите название кнопки Проверка диалогов CommonDialog.

Полученное приложение представлено на рис. 7.21. Этот проект, содержащий элемент управления commonDialog, будем использовать для создания диалоговых окон и знакомства с ними, размещая в событии click кнопки cbControl код настройки параметров требуемого диалогового окна и вызова соответствующего ему метода.