Метод Add

Добавляет объект в семейство.

Синтаксис

объект.Add(компонент)

Синтаксис метода Add содержит следующие элементы:

Элемент	Описание
объект	Обязательный. Объектное выражение, значением которого является один из объектов, перечисленных в списке "Применение".
компонент	Обязательный. Для семейства LinkedWindows это объект. Для семейства VBComponents -- специальная константа, представляющая модуль класса, форму или стандартный модуль.
В качестве аргумента компонент может использоваться одна из следующих констант:

Константа	Описание
vbext_ct_ClassModule	Добавляет модуль класса в семейство.
Vbext_ct_MSForm	Добавляет форму в семейство.
Vbext_ct_StdModule	Добавляет стандартный модуль в семейство.
Дополнительные сведения

Для семейства LinkedWindows метод Add добавляет окно в семейство текущих связанных окон.

Примечание.   Пользователь может добавить окно, являющееся областью связанной рамки окна, в другое связанное окно, просто передвинув окно из одной области в другую. Если связанная рамка окна, из которой окно было передвинуто, не содержит других областей, она разрушается.

Для семейства VBComponents метод Add создает новый стандартный компонент и добавляет его в проект.

Для семейства VBComponents метод Add возвращает объект VBComponent. Для семейства LinkedWindows метод Add возвращает значение Nothing.


Метод AddFromFile

Для семейства References добавляет ссылку на проект из некоторого файла. Для объекта CodeModule добавляет содержимое файла в модуль.

Синтаксис

объект.AddFromFile(имя_файла)

Синтаксис метода AddFromFile содержит следующие элементы:

Элемент	Описание
объект	Обязательный. Объектное выражение, значением которого является один из объектов, перечисленных в списке "Применение".
имя_файла	Обязательный. Строковое выражение, определяющее имя файла, которое добавляется в проект или модуль. Если имя файла не найдено и путь к нему не указан, поиск проводится в каталогах, найденных с помощью функции Windows OpenFile.
Дополнительные сведения

Для объекта CodeModule метод AddFromFile вставляет содержимое файла, начиная со строки, предшествующей первой процедуре в программном модуле. Если модуль не содержит процедур, метод AddFromFile помещает содержимое файла в конец модуля.


Метод AddFromGuid

Добавляет ссылку в семейство Reference с помощью уникального кода ссылки (GUID).

Синтаксис

объект.AddFromGuid(GUID, старший, младший) As Reference

Синтаксис метода AddFromGuid содержит следующие элементы:

Элемент	Описание
объект	Обязательный. Объектное выражение, значением которого является один из объектов, перечисленных в списке "Применение".
GUID	Обязательный. Строковое выражение, представляющее код GUID ссылки.
старший	Обязательный. Переменная типа Long, указывающая номер старшей версии ссылки.
младший	Обязательный. Переменная типа Long, указывающая номер младшей версии ссылки.
Дополнительные сведения

Чтобы найти ссылку, которую необходимо добавить, метод AddFromGuid ищет реестр. GUID может быть библиотекой типов, элементом управления, идентификатором класса и т.д.


Метод AddFromString

Добавляет текст в модуль.

Синтаксис

объект.AddFromString

Прототип объект представляет собой объектное выражение, значением которого является один из объектов, перечисленных в списке "Применение".

Дополнительные сведения

Метод AddFromString вставляет текст, начиная со строки, предшествующей первой процедуре в модуле. Если модуль не содержит процедур, метод AddFromString  помещает текст в конец модуля.


Метод Close

Закрывает и уничтожает окно.

Синтаксис

объект.Close

Прототип объект представляет собой объектное выражение, значением которого является один из объектов, перечисленных в списке "Применение".

Дополнительные сведения

Метод Close по-разному действует на следующие типы окон:

•	Если окно является областью окна программы, Close разрушает эту область.

•	Если окно является конструктором, Close
уничтожает содержащийся в нем конструктор.

•	Если окно должно всегда оставаться доступным в пункте меню Вид, метод Close скрывает такое окно.


Метод CreateEventProc

Создает процедуру обработки события.

Синтаксис

объект.CreateEventProc(событие, источник) As Long

Синтаксис метода CreateEventProc содержит следующие элементы:

Элемент	Описание
объект	Обязательный. Объектное выражение, значением которого является один из объектов, перечисленных в списке "Применение".
событие	Обязательный. Строковое выражение, указывающее имя события, которое добавляется в модуль.
источник	Обязательный. Строковое выражения, указывающее имя объекта, который является источником события.
Дополнительные сведения

Метод CreateEventProc используется для создания процедуры обработки события. Например, чтобы создать процедуру обработки события "Нажатие кнопки" (Click) для элемента управления Command Button с именем Command1, можно использовать следующий код (CM представляет собой объект типа CodeModule):

TextLocation = CM.CreateEventProc("Нажатие кнопки", "Command1")

Метод CreateEventProc возвращает строку, с которой начинается основная часть процедуры обработки события. CreateEventProc не сработает, если аргументы относятся к несуществующему событию.


Метод DeleteLines

Стирает одну строку или указанную последовательность строк.

Синтаксис

объект.DeleteLines (строка [, количество])

Синтаксис метода DeleteLines содержит следующие элементы:

Элемент	Описание
объект	Обязательный. Объектное выражение, значением которого является один из объектов, перечисленных в списке "Применение".
строка	Обязательный. Переменная типа Long, указывающая номер первой строки, которую надо стереть.
количество	Необязательный. Переменная типа Long, указывающая количество строк, которые надо стереть.
Дополнительные сведения

Если число стираемых строк не указано, DeleteLines сотрет одну строку.


Метод Export

Сохраняет компонент как отдельный файл или файлы.

Синтаксис

объект.Export(имя_файла)

Синтаксис метода Export содержит следующие элементы:

Элемент	Описание
объект	Обязательный. Объектное выражение, значением которого является один из объектов, перечисленных в списке "Применение".
имя_файла	Обязательный. Переменная типа String, указывающая имя файла, в котором будет сохранен компонент.
Дополнительные сведения

Если метод Export используется для сохранения компонента как отдельного файла или файлов, имя этого файла не должно совпадать с именем уже существующего файла, иначе возникает ошибка.


Метод Find

Ищет активный модуль, содержащий указанную строку.

Синтаксис

объект.Find(образец, строка1, столбец1, строка2, столбец2 [, слово] [, регистр] [, выражение]) As Boolean

Синтаксис метода Find содержит следующие элементы:

Элемент	Описание
объект	Обязательный. Объектное выражение, значением которого является один из объектов, перечисленных в списке "Применение".
образец	Обязательный. Переменная типа String, значением которой является искомый текст или образец.
строка1	Обязательный. Переменная типа Long, указывающая номер строки, с которой начинается поиск. Если найден текст, совпадающий с образцом, получает значение номера первой строки найденного текста.
столбец1	Обязательный. Переменная типа Long, указывающая номер столбца, с которого начинается поиск. Если найден текст, совпадающий с образцом, получает значение номера первого столбца найденного текста.
строка2	Обязательный. Переменная типа Long, указывающая номер последней строки совпадающего с образцом текста (если он найден).
столбец2	Обязательный. Переменная типа Long, указывающая номер последнего столбца совпадающего с образцом текста (если он найден).
слово	Необязательный. Переменная типа Boolean, указывающая, что проводится поиск слов только целиком; в этом случае для нее задается значение True. По умолчанию имеет значение False.
регистр	Необязательный. Переменная типа Boolean, указывающая, что поиск проводится с учетом буквенного регистра; в этом случае для нее задается значение True. По умолчанию имеет значение False.
выражение	Необязательный. Переменная типа Boolean, указывающая, что образцом представляет собой правильное выражение; в этом случае для нее задается значение True. По умолчанию имеет значение False.
Дополнительные сведения

Если найден текст, совпадающий с образцом, метод Find возвращает значение True, в противном случае -- значение False.

Аргументы регистр и образец являются взаимоисключающими. Если оба аргумента имеют значение True, возникает ошибка.

Метод Find не влияет на содержимое диалогового окна Find.


Метод GetSelection

Возвращает выделенный фрагмент в области окна программы.

Синтаксис

объект.GetSelection(строка1, столбец1, строка2, столбец2)

Синтаксис метода GetSelection содержит следующие элементы:

Элемент	Описание
объект	Обязательный. Объектное выражение, значением которого является один из объектов, перечисленных в списке "Применение".
строка1	Обязательный. Переменная типа Long, указывающая номер первой строки выделенного фрагмента  в области окна программы.
столбец1	Обязательный. Переменная типа Long, указывающая номер первого столбца выделенного фрагмента в области окна программы.
строка2	Обязательный. Переменная типа Long, указывающая номер последней строки выделенного фрагмента в области окна программы.
столбец2	Обязательный. Переменная типа Long, указывающая номер последнего столбца выделенного фрагмента в области окна программы.
Дополнительные сведения

При использовании метода GetSelection информация содержится в возвращаемых значениях аргументов. Следовательно, надо использовать переменные, которые будут возвращать информацию путем модификации их значений.


Метод Import

Добавляет компонент в проект из файла; возвращает этот вновь добавленный компонент.

Синтаксис

объект.Import(имя_файла) As VBComponent

Синтаксис метода Import содержит следующие элементы:

Элемент	Описание
объект	Обязательный. Объектное выражение, значением которого является один из объектов, перечисленных в списке "Применение".
имя_файла	Обязательный. Переменная типа String, указывающая путь и имя для файла, из которого извлекается компонент.
Дополнительные сведения

Метод Import может использоваться для добавления в проект компонента, формы, модуля, класса, и т.д.


Метод InsertLines

Вставляет одну или несколько строк в указанное место программы.

Синтаксис

объект.InsertLines(строка, текст)

Синтаксис метода InsertLines содержит следующие элементы:

Элемент	Описание
объект	Обязательный. Объектное выражение, значением которого является один из объектов, перечисленных в списке "Применение".
строка	Обязательный. Переменная типа Long, указывающая место в программе, куда вставляются новые строки.
текст	Обязательный. Переменная типа String, содержащая вставляемый текст.
Дополнительные сведения

Если вставляемый с помощью InsertLines текст содержит символы возврата каретки с переводом строки, он будет вставлен в виде последовательности строк.


Метод Item

Возвращает компонент семейства с заданным номером.

Синтаксис

объект.Item(индекс)

Синтаксис метода Item содержит следующие элементы:

Элемент	Описание
объект	Обязательный. Объектное выражение, значением которого является один из объектов, перечисленных в списке "Применение".
индекс	Обязательный. Выражение, определяющее положение компонента в семействе. Если этот аргумент задается с помощью числового выражения, то индекс должен иметь значение от 1 до значения свойства Count для семейства. Если этот аргумент задается с помощью строкового выражения, то его значение должно совпадать со значением аргумента key, которое указывается при добавлении компонента в семейство.
В следующей таблице перечислены семейства и соответствующие им аргументы key для использования с методом Item. Строка, передаваемая в метод Item должна совпадать с аргументом key семейства.

Семейство	Аргумент Key
Windows	Значение свойства Caption
LinkedWindows	Значение свойства Caption
CodePanes	Специальная строка не предусмотрена.
VBProjects	Значение свойства Name
VBComponents	Значение свойства Name
References	Значение свойства Name
Properties	Значение свойства Name
Дополнительные сведения

Аргумент индекс может быть числовым значением или строкой, содержащей заголовок объекта.


Метод Lines

Возвращает указанные строки программы.

Синтаксис

объект.Lines(строка, количество) As String

Синтаксис метода Lines содержит следующие элементы:

Элемент	Описание
объект	Обязательный. Объектное выражение, значением которого является один из объектов, перечисленных в списке "Применение".
строка	Обязательный. Переменная типа Long, указывающая номер первой строки возвращаемого текста
количество	Обязательный. Переменная типа Long, указывающая количество строк возвращаемого текста.
Дополнительные сведения

Номера строк в программном модуле начинаются с 1.


Метод ProcBodyLine

Возвращает первую строку процедуры.

Синтаксис

объект.ProcBodyLine(имя_процедуры, тип_процедуры) As Long

Синтаксис метода ProcBodyLine содержит следующие элементы:

Элемент	Описание
объект	Обязательный. Объектное выражение, значением которого является один из объектов, перечисленных в списке "Применение".
Имя_процедуры	Обязательный. Переменная типа String, содержащая имя процедуры.
Тип_процедуры	Обязательный. Указывает вид процедуры, которую надо найти. Поскольку в модуле может находиться несколько различных процедур Property, необходимо указывать вид искомой процедуры. Все процедуры, отличные от процедур-свойств (т.е., процедуры Sub и Function) используют аргумент vbext_pk_Proc.
В качестве аргументатип_процедуры используются следующие константы:

Константа	Описание
vbext_pk_Get	Соответствует процедуре, возвращающей значение свойства.
vbext_pk_Let	Соответствует процедуре, присваивающей свойству значение.
vbext_pk_Set	Соответствует процедуре, задающей ссылку на объект.
vbext_pk_Proc	Используется со всеми процедурами, отличными от процедур-свойств.
Дополнительные сведения

Первой строкой процедуры является строка, на которой находится инструкция Sub, Function или Property.


Метод ProcCountLines

Возвращает количество строк в указанной процедуре.

Синтаксис

объект.ProcCountLines(имя_процедуры, тип_процедуры) As Long

Синтаксис метода ProcCountLines содержит следующие элементы:

Элемент	Описание
объект	Обязательный. Объектное выражение, значением которого является один из объектов, перечисленных в списке "Применение".
имя_процедуры	Обязательный. Переменная типа String, содержащая имя процедуры.
тип_процедуры	Обязательный. Указывает вид процедуры, которую надо найти. Поскольку в модуле может находиться несколько различных процедур Property, необходимо указывать вид искомой процедуры. Все процедуры, отличные от процедур-свойств(т.е., процедуры Sub и Function) используют аргумент vbext_pk_Proc.
В качестве аргументатип_процедуры используются следующие константы:

Константа	Описание
vbext_pk_Get	Соответствует процедуре, возвращающей значение свойства.
vbext_pk_Let	Соответствует процедуре, присваивающей свойству значение.
vbext_pk_Set	Соответствует процедуре, задающей ссылку на объект.
vbext_pk_Proc	Используется со всеми процедурами, отличными от процедур-свойств.
Дополнительные сведения

Метод ProcCountLines учитывает все пустые строки или строки комментария, предшествующие описанию процедуры, и, если процедура является последней в программном модуле, все пустые строки, следующие за процедурой.


Метод ProcOfLine

Возвращает имя процедуры, содержащей строку с указанным номером.

Синтаксис

объект.ProcOfLine(строка, тип_процедуры) As String

Синтаксис метода ProcOfLine содержит следующие элементы:

Элемент	Описание
объект	Обязательный. Объектное выражение, значением которого является один из объектов, перечисленных в списке "Применение".
строка	Обязательный. Переменная типа Long, указывающая номер искомой строки.
тип_процедуры	Обязательный. Указывает вид процедуры, которую надо найти. Поскольку в модуле может находиться несколько различных процедур Property, необходимо указывать вид искомой процедуры. Все процедуры, отличные от процедур-свойств(т.е., процедуры Sub и Function) используют аргумент vbext_pk_Proc.
В качестве аргументатип_процедуры используются следующие константы:

Константа	Описание
vbext_pk_Get	Соответствует процедуре, возвращающей значение свойства.
vbext_pk_Let	Соответствует процедуре, присваивающей свойству значение.
vbext_pk_Set	Соответствует процедуре, задающей ссылку на объект.
vbext_pk_Proc	Используется со всеми процедурами, отличными от процедур-свойств.
Дополнительные сведения

Пустые строки или строки комментария, предшествующие описанию процедуры, а также, если процедура является последней в программном модуле, все пустые строки, следующие за процедурой, считаются находящимися внутри процедуры.


Метод ProcStartLine

Возвращает строку, с которой начинается указанная процедура.

Синтаксис

объект.ProcStartLine(имя_процедуры, тип_процедуры) As Long

Синтаксис метода ProcStartLine содержит следующие элементы:

Элемент	Описание
объект	Обязательный. Объектное выражение, значением которого является один из объектов, перечисленных в списке "Применение".
имя_процедуры	Обязательный. Переменная типа String, содержащая имя процедуры.
тип_процедуры	Обязательный. Указывает вид процедуры, которую надо найти. Поскольку в модуле может находиться несколько различных процедур Property, необходимо указывать вид искомой процедуры. Все процедуры, отличные от процедур-свойств(т.е., процедуры Sub и Function) используют аргумент vbext_pk_Proc.
В качестве аргументатип_процедуры используются следующие константы:

Константа	Описание
vbext_pk_Get	Соответствует процедуре, возвращающей значение свойства.
vbext_pk_Let	Соответствует процедуре, присваивающей свойству значение.
vbext_pk_Set	Соответствует процедуре, задающей ссылку на объект.
vbext_pk_Proc	Используется со всеми процедурами, отличными от процедур-свойств.
Дополнительные сведения

Процедура начинается со строки, следующей за инструкцией End Sub предшествующей процедуры. Если процедура является первой, она начинается сразу после общего раздела описаний.


Метод Remove

Удаляет компонент из семейства.

Синтаксис

объект.Remove(компонент)

Синтаксис метода Remove содержит следующие элементы:

Элемент	Описание
объект	Обязательный. Объектное выражение, значением которого является один из объектов, перечисленных в списке "Применение".
компонент	Обязательный. Для семейства LinkedWindows это объект. Для семейства References -- ссылка на библиотеку типов или на проект. Для семейства VBComponents -- специальная константа, представляющая модуль класса, форму или стандартный модуль.
Дополнительные сведения

Если метод Remove используется для семейства LinkedWindows, он удаляет окно из текущего семейства связанных окон. Удаленное окно становится перемещаемым окном, которое имеет свою собственную связанную рамку окна.


Метод ReplaceLine

Замещает одну строку программы другой.

Синтаксис

объект.ReplaceLine(строка, текст)

Синтаксис метода ReplaceLine содержит следующие элементы:

Элемент	Описание
объект	Обязательный. Объектное выражение, значением которого является один из объектов, перечисленных в списке "Применение".
строка	Обязательный. Переменная типа Long, указывающая номер строки, которую надо заменить другой.
текст	Обязательный. Переменная типа String, содержащая вставляемую строку.


Метод SetFocus

Передает фокус указанному окну.

Синтаксис

объект.SetFocus

Прототип объект представляет собой объектное выражение, значением которого является один из объектов, перечисленных в списке "Применение".

Дополнительные сведения

Метод SetFocus используется для окон, которые уже являются видимыми.


Метод SetSelection

Выделяет фрагмент в области окна программы.

Синтаксис

объект.SetSelection(строка1, столбец1, строка2, столбец2)

Синтаксис метода SetSelection содержит следующие элементы:

Элемент	Описание
объект	Обязательный. Объектное выражение, значением которого является один из объектов, перечисленных в списке "Применение".
строка1	Обязательный. Переменная типа Long, указывающая номер первой строки выделенного фрагмента.
столбец1	Обязательный. Переменная типа Long, указывающая номер первого столбца выделенного фрагмента.
строка2	Обязательный. Переменная типа Long, указывающая номер последней строки выделенного фрагмента.
столбец2	Обязательный. Переменная типа Long, указывающая номер последнего столбца выделенного фрагмента.


Метод Show

Выводит указанную область окна программы на передний план.

Синтаксис

объект.Show

Прототип объект представляет собой объектное выражение, значением которого является один из объектов, перечисленных в списке "Применение".

Дополнительные сведения

Метод Show передает фокус указанной области программы в данном окне.


Пример использования метода Add

В данном примере метод Add используется для добавления одного стандартного модуля в семейство VBComponents.

Application.VBE.VBProjects(1).VBComponents.Add(vbext_ct_StdModule)


Пример использования метода AddFromFile

В данном примере метод AddFromFile используется для добавления содержимого некоторого файла в указанную область окна программы.

Application.VBE.CodePanes(3).CodeModule.AddFromFile "c:\Code Files\book2.frm"


Пример использования метода AddFromGUID

В данном примере метод AddFromGUID используется для добавления ссылки на текущий проект. Для этого указывается ссылка с помощью значения кода GUID объекта Reference.

Application.VBE.ActiveVBProject.References.AddFromGuid("{000204EF-0000-0000-C000-000000000046}", 5, 0)


Пример использования метода AddFromString

В данном примере метод AddFromString используется для добавления строки «Dim intJack As Integer» в указанную область окна программы.

Application.VBE.CodePanes(3).CodeModule.AddFromString "Dim intJack As Integer"


Пример использования метода Close

В данном примере метод Close закрывает указанный компонент семейства Windows.

Application.VBE.Windows(9).Close


Пример использования метода CreateEventProc

В данном примере метод CreateEventProc используется для создания процедуры Button_Click.

Debug.Print Application.VBE.SelectVBComponents.CodeModule.CreateEventProc("Нажмите ", "кнопку ")


Пример использования метода DeleteLines

Следующий пример состоит из двух частей. Первый цикл For…Next с помощью метода InsertLines вставляет в область окна программы CodePanes(1) 26 последовательно удлиняющихся сегментов латинского алфавита, начиная с буквы "a". Последний вставленный сегмент представляет собой весь алфавит.

Во второй части цикл For…Next использует метод DeleteLines для удаления строк с нечетными номерами. На первый взгляд кажется, что второй цикл должен просто стирать каждую вторую строку, однако следует принять во внимание, что после каждой операции удаления нумерация строк производится заново. Следовательно, на каждом шаге стирается каждая третья строка: первая строка пропускается, так как I увеличивается на единицу, а вторая -- поскольку больший номер строки каждый раз уменьшается на единицу.

For I = 1 to 26

Application.VBE.SelectedVBComponent.CodeModule.InsertLines i, Mid$("abcdefghijklmnopqrstuvwxyz", 1, I)

Next

For I = 1 to 13

Application.VBE.SelectedVBComponent.CodeModule.DeleteLines I

Next


Пример использования метода Export

В данном примере создается файл с именем test.bas и с помощью метода Export, в него копируется содержимое стандартного модуля VBComponents(1).

Application.VBE.ActiveVBProject.VBComponents(1).Export("test.bas")


Пример использования метода Find

В данном примере с помощью метода Find устанавливается, что указанная последовательность строк в области окна программы (строки с 1261 по 1279) содержит строку «Tabs.Clear».

Application.VBE.CodePanes(2).CodeModule.Find ("Tabs.Clear", 1261, 1, 1280, 1, False, False)


Пример использования метода GetSelection

В следующем примере возвращается местоположение начальных и конечных координат выделенного фрагмента в области окна программы CodePanes(1). В последней строке примера метод GetSelection используется для присвоения четырех значений четырем переменным.

Dim m As Long

Dim n As Long

Dim x As Long

Dim y As Long

Application.VBE.CodePanes(1).GetSelection m, n, x, y


Пример использования метода Import

В данном примере метод Import семейства VBComponents используется, чтобы скопировать содержимое файла test.bas в стандартный модуль.

Application.VBE.ActiveVBProject.VBComponents.Import("test.bas")


Пример использования метода InsertLines

В данном примере метод InsertLines используется, чтобы вставить строку "Option Explicit" в указанную область окна программы.

Application.VBE.CodePanes(1).CodeModule.InsertLines 1, "Option Explicit"


Пример использования метода Item

В данном примере показаны два способа вывода на экран указанного компонента семейства CodePanes; в одном из них используется метод Item.

Application.VBE.CodePanes.Item(2).Show

Application.VBE.CodePanes(2).Show


Пример использования метода Lines

В данном примере метод Lines используется для возвращения указанного блока программы (строки с 1 по 4) в определенную область окна программы.

Debug.Print Application.VBE.CodePanes(1).CodeModule.Lines( 1, 4)


Пример использования метода ProcBodyLine

В данном примере метод ProcBodyLine используется для возвращения номера первой строки процедуры SetupTabs в определенную область окна программы.

Debug.Print Application.VBE.CodePanes(3).CodeModule.ProcBodyLine ("SetupTabs", vbext_pk_Proc)


Пример использования метода ProcCountLines

В данном примере метод ProcCountLines используется для возвращения указанного числа строк процедуры SetupTabs в определенную область окна программы.

Debug.Print Application.VBE.CodePanes(3).CodeModule.ProcCountLines ("SetupTabs", vbext_pk_Proc)


Пример использования метода ProcOfLine

В данном примере метод ProcOfLine используется для возвращения имени процедуры, содержащей строку с указанным номером, в определенную область окна программы.

Debug.Print Application.VBE.CodePanes(3).CodeModule.ProcOfLine (1270, vbext_pk_Proc)


Пример использования метода ProcStartLine

В данном примере метод ProcStartLine используется для возвращения строки, с которой начинается указанная процедура, в определенную область окна программы.

Debug.Print Application.VBE.CodePanes(3).CodeModule.ProcStartLine ("SetupTabs", vbext_pk_Proc)


Пример использования метода Remove

В данном примере устанавливается, что определенный компонент семейства VBComponents является модулем, а затем этот модуль удаляется с помощью метода Remove.

Debug.Print Application.VBE.ActiveVBProject.VBComponents(4).Name

Application.VBE.ActiveVBProject.VBComponents.Remove Application.VBE.ActiveVBProject.VBComponents(4)


Пример использования метода ReplaceLine

Следующий пример состоит из двух частей. Первый цикл For…Next с помощью метода InsertLines вставляет в область окна программы CodePanes(1) 26 последовательно удлиняющихся сегментов латинского алфавита, начиная с буквы "a". Последний вставленный сегмент представляет собой весь алфавит.

Второй цикл For…Next с помощью метода ReplaceLine замещает строку с четным номером последним символом текста, который содержался в этой строке ранее. Строки с нечетными номерами не изменяются.

For I = 1 to 26

Application.VBE.CodePanes(1).CodeModule.InsertLines I, Mid$("abcdefghijklmnopqrstuvwxyz", 1, I)

Next I

For I = 1 to 13

Application.VBE.CodePanes(1).CodeModule.ReplaceLine 2*I, Mid$("abcdefghijklmnopqrstuvwxyz", 1, I)

Next I


Пример использования метода SetFocus

В данном примере метод SetFocus используется для установки фокуса на определенный компонент семейства Windows. Другими словами, он вызывает те же последствия, что и выделение мышью заголовка данного окна.

Application.VBE.Windows(9).SetFocus


Пример использования метода SetSelection

В данном примере метод SetSelection используется для выделения участка текста, первый символ которого совпадает с символом, который следует непосредственно за четвертым символом второй строки CodePanes(1), а последний совпадает с пятнадцатым символом третьей строки.

Application.VBE.CodePanes(1).SetSelection 2,4,3,15


Пример использования метода Show

В данном примере метод Show используется для вывода указанной области окна программы на передний план.

Application.VBE.CodePanes(2).Show


Событие Click

Данное событие происходит, когда установлено свойство OnAction для соответствующего элемента управления на панели команд.

Синтаксис

Sub объект_Click (ByVal ctrl As Object, ByRef handled As Boolean, ByRef canceldefault As Boolean)

Синтаксис события Click (Нажатие кнопки) содержит следующие именованные аргументы:

Элемент	Описание
ctrl	Обязательный; тип данных Object. Указывает объект -- источник события "Нажатие кнопки" (Click).
handled	Обязательный; тип данных Boolean. Если его значение равно True, событие должно обрабатываться с помощью других надстроек. Если False -- действие элемента панели команд не было обработано.
canceldefault	Обязательный; тип данных Boolean. Если его значение равно True, выполняются действия, предусмотренные по умолчанию, до их отмены надстройкой, обрабатывающей нисходящий поток команд. Если False -- действия, предусмотренные по умолчанию не выполняются до их восстановления надстройкой, обрабатывающей нисходящий поток команд.
Дополнительные сведения

Событие Click с объектом CommandBarEvents выполняется особым образом. С помощью ключевого слова WithEvents описывается переменная, определяющая событие Click для элемента управления CommandBar. Этой переменной будет присвоено возвращаемое значение свойства CommandBarEvents объекта Events. Свойство CommandBarEvents использует элемент управления CommandBar в качестве аргумента. При выборе элемента управления CommandBar (для переменной, описанной с помощью ключевого слова WithEvents) выполняется программа.


Событие ItemAdded

Данное событие происходит после добавления ссылки.

Синтаксис

Sub объект_ItemAdded(ByVal элемент As Reference)

Обязательный аргумент элемент указывает добавленный объект.

Дополнительные сведения

Событие ItemAdded (Элемент добавлен) происходит, когда объект Reference добавляется в семейство References.


Событие ItemRemoved

Данное событие происходит после удаления ссылки из проекта.

Синтаксис

Sub объект_ItemRemoved(ByVal элемент As Reference)

Обязательный аргумент элемент указывает объект Reference, который был удален.


Пример события "Нажатие кнопки" (Click)

В данном примере проиллюстрировано, как можно написать программу для процедуры события "Нажатие кнопки" (Click) с помощью инструкций WithEvents и Set. Следует отметить, что вместо пункта меню Сервис в имени события "Нажатие кнопки" (Click) используется ссылка на объект ce.

Private WithEvents ce As CommandBarEvents

Sub Test()

    Dim c As CommandBarControl

    Set c = Application.VBE.CommandBars("Сервис").Controls(1)

    Set ce = Application.VBE.Events.CommandBarEvents(c)

End Sub

Private Sub ce_Click(ByVal CommandBarControl As Object, Handled As Boolean, CancelDefault As Boolean)

    ' Место для инструкций обработки события.

End Sub


Свойство SelectedVBComponent

Возвращает выделенный компонент.  Только для чтения.

Дополнительные сведения

Свойство SelectedVBComponent возвращает выделенный компонент в окно проекта.  Если элемент, выделенный в окне проекта, не является компонентом, свойство SelectedVBComponent возвращает значение Nothing.


Свойство ActiveVBProject

Возвращает активный проект в окно проекта.  Только для чтения.

Дополнительные сведения

Свойство ActiveVBProject возвращает проект, выделенный в окне проекта или проект, содержащий выделенный компонент.  В последнем случае проект не обязан быть выделенным.  Вне зависимости от того, имеется ли проект, выделенный явным образом, всегда существует активный проект.


Свойство ActiveWindow

Возвращает активное окно в среде разработчика.  Только для чтения.

Дополнительные сведения

Если в среде разработчика открыто несколько окон, значением свойства ActiveWindow является окно, имеющее фокус.  Когда фокус имеет главное окно, свойство ActiveWindow возвращает значение Nothing.


Свойство Caption

Возвращает значение типа String, содержащее заголовок активного окна.  Только для чтения.

Дополнительные сведения

Заголовком активного окна называют текст, выводящийся в строке заголовка окна.


Свойство CodeModule

Возвращает объект, представляющий программу, определенную для компонента.  Только для чтения.

Дополнительные сведения

Свойство CodeModule возвращает значение Nothing, если компонент не имеет связанного с ним программного модуля.

Примечание.   Объект CodePane представляет видимое окно программы.  Конкретный компонент может иметь несколько объектов CodePane.  Объект CodeModule представляет программу, определенную для компонента.  Каждому компоненту может соответствовать только один объект CodeModule.


Свойство CodePane

Возвращает объект CodePane. Только чтение.

Дополнительные сведения

Если область программы существует, она становится активной областью программы, а содержащее ее окно - активным окном. Если области программы для модуля не существует, свойство CodePane создает ее.


Свойство CodePaneView

Возвращает значение, указывающее, находится ли область программы в режиме просмотра процедуры или в режиме просмотра модуля.  Только для чтения.

Возвращаемые значения

Свойство CodePaneView возвращает следующие значения:

Константа	Описание
vbext_cv_ProcedureView	Указанная область программы находится в режиме просмотра процедуры.
Vbext_cv_FullModuleView	Указанный проект находится в режиме просмотра модуля.


Свойство Collection

Возвращает семейство, содержащее объект, с которым работает пользователь.  Только для чтения.

Дополнительные сведения

Для большинства объектов в используемой модели объектов определено либо свойство Parent, либо свойство Collection, указывающее на родительский объект указанного объекта.

Свойство Collection обеспечивает доступ к свойствам, методам и элементам управления семейства, к которому принадлежит объект.


Свойство CommandBarEvents

Возвращает объект CommandBarEvents.  Только для чтения.

Значения

Аргумент, передаваемый в свойство CommandBarEvents, имеет вид:

Аргумент	Описание
элементVB	Должен представлять объект типа CommandBarControl.
Дополнительные сведения

Свойство CommandBarEvents используют для возвращения объекта-источника события, который запускает событие при нажатии кнопки на панели инструментов.  Аргумент, передаваемый в свойство CommandBarEvents, должен представлять элемент управления панели инструментов, для которого генерируется событие нажатия кнопки.


Свойство Count

Возвращает значение типа Long, содержащее число элементов в семействе.  Только для чтения.


Свойство CountOfLines

Возвращает значение типа Long, содержащее число строк программы в программном модуле.  Только для чтения.


Свойство CountOfDeclarationLines

Возвращает значение типа Long, содержащее число строк программы в разделе описаний программного модуля.  Только для чтения.


Свойство CountOfVisibleLines

Возвращает значение типа Long, содержащее число строк, которые являются видимыми в области программы.  Только для чтения.


Свойство ActiveCodePane

Возвращает активный или последний активный объект CodePane или указывает активный объект CodePane.  Чтение/запись.

Дополнительные сведения

В свойстве ActiveCodePane можно указать любой допустимый объект CodePane, как показано в следующем примере:

Set MyApp.VBE.ActiveCodePane = MyApp.VBE.CodePanes(1)

Эта инструкция делает активной областью программы первую область программы в семействе областей программы.  Область программы можно также сделать активной с помощью метода Set.


Свойство Description

Возвращает или задает строковое выражение, содержащее описание объекта.  Для объекта VBProject это свойство доступно для чтения/записи; для объекта Reference свойство доступно только для чтения.

Дополнительные сведения

Для объекта VBProject свойство Description возвращает или задает стоку описания, связанную с активным проектом.

Для объекта Reference свойство Description возвращает краткое описание ссылки.


Свойство Designer

Возвращает объект, обеспечивающий доступ к средствам разработки компонента.

Дополнительные сведения

Если для объекта открыто окно конструктора, свойство Designer возвращает открытое окно конструктора; в противном случае создается новое окно конструктора.  Окно конструктора является характеристикой определенных объектов VBComponent, при создании которых окно конструктора создается вместе с объектом.  Компонент может иметь только одно окно конструктора, причем всегда одно и то же. Свойство Designer обеспечивает доступ к объекту, специфическому для компонента.  В некоторых случаях, например, для стандартных модулей и модулей класса окно конструктора не создается, поскольку эти типы объектов VBComponent не поддерживают окно конструктора.

Если объект VBComponent не имеет окна конструктора, свойство Designer возвращает значение Nothing.


Свойство DesignerWindow

Возвращает объект Window, представляющий окно конструктора компонента.

Дополнительные сведения

Если компонент поддерживает окно конструктора, но не имеет открытого окна конструктора, то окно конструктора создается при обращении к свойству DesignerWindow, но при этом является невидимым.  Чтобы сделать окно видимым, следует задать значение True для свойства Visible объекта Window.


Свойство CodePanes

Возвращает семейство активных объектов CodePane.  Только для чтения.


Свойство GUID

Возвращает значение типа String, содержащее идентификатор класса объекта.  Только для чтения.


Свойство HasOpenDesigner

Возвращает значение типа Boolean, указывающее, имеет или нет объект VBComponent открытое окно конструктора.  Только для чтения.

Возвращаемые значения

Свойство HasOpenDesigner возвращает следующие значения:

Значение	Описание
True	Объект VBComponent имеет открытое окно конструктора.
False	Объект VBComponent не имеет открытого окна конструктора


Свойство Height

Возвращает или задает значение типа Single, содержащее высоту окна в единицах твип.  Чтение/запись.

Дополнительные сведения

Изменение значения свойства Height связанного окна или закрепленного окна не имеет последствий, пока окно остается связанным или закрепленным.


Свойство HelpContextID

Возвращает или задает значение типа String, содержащее контекстный идентификатор раздела справки Microsoft Windows.  Чтение/запись.


Свойство HelpFile

Возвращает или задает значение типа String, указывающее файл справки Microsoft Windows для проекта.  Чтение/запись.


Свойство IndexedValue

Возвращает или задает значение компонента свойства, которое определяется индексированным списком или массивом.

Дополнительные сведения

Значение, возвращаемое или задаваемое свойством IndexedValue, представляет выражение, которое при оценке дает тип, принимаемый объектом.  Для свойства, представляющего индексированный список или массив, необходимо использовать свойство IndexedValue вместо свойства Value.  Индексированный список является числовым выражением, указывающим положение индекса.

Свойство IndexedValue принимает до 4 индексов.  Число индексов, принимаемых свойством IndexedValue, возвращается в значении свойства NumIndices.

Свойство IndexedValue используется только в тех случаях, когда значение свойства NumIndices превышает нуль.  Значения в индексированном списке задаются или возвращаются с помощью одного индекса.


Свойство IsBroken

Возвращает значение типа Boolean, указывающее, представляет ли объект Reference допустимую ссылку в реестре.  Только для чтения.

Возвращаемые значения

Свойство IsBroken возвращает следующие значения:

Значение	Описание
True	Объект Reference более не представляет допустимую ссылку в реестре.
False	Объект Reference представляет допустимую ссылку в реестре.


Свойство BuiltIn

Возвращает значение типа Boolean, указывающее, является ли ссылка стандартной ссылкой, которую нельзя удалить.  Только для чтения.

Возвращаемые значения

Свойство BuiltIn возвращает следующие значения:

Значение	Описание
True	Ссылка является стандартной ссылкой, которую нельзя удалить.
False	Ссылка не является стандартной ссылкой и может быть удалена.


Свойство Saved

Возвращает значение типа Boolean, указывающее, был ли объект изменен после его последнего сохранения.  Чтение/запись.

Возвращаемые значения

Свойство Saved возвращает следующие значения:

Значение	Описание
True	Объект не был изменен после его последнего сохранения.
False	Объект был изменен после его последнего сохранения.
Дополнительные сведения

Метод SaveAs задает для свойства Saved значение True.

Примечание.   Ели задать для свойства Saved значение False в программе, это свойство будет возвращать значение False, а объект будет отмечен как измененный после его последнего сохранения.


Свойство Left

Возвращает или задает значение типа Single, содержащее положение левой границы окна на экране в единицах твип.  Чтение/запись.

Дополнительные сведения

Значение, возвращаемое свойством Left, зависит от того, является ли окно связанным или закрепленным.

Примечание.   Изменение значения свойства Left для связанного или закрепленного окна не имеет последствий, пока окно остается связанным или закрепленным.


Свойство LinkedWindowFrame

Возвращает объект Window, представляющий рамку, содержащую окно.  Только для чтения.

Дополнительные сведения

Свойство LinkedWindowFrame обеспечивает доступ к объекту, представляющему рамку связанных окон, свойства которой отличаются от свойств содержащихся в ней окон.  Если окно не является связанным, свойство LinkedWindowFrame возвращает значение Nothing.


Свойство FullPath

Возвращает значение типа String, содержащее путь и имя файла адресуемой библиотеки типов.  Только для чтения.


Свойство MainWindow

Возвращает объект Window, представляющий главное окно среды разработчика Visual Basic.  Только для чтения.

Дополнительные сведения

Объект Window, который возвращается свойством MainWindow, используют для добавления или удаления закрепленных окон.  Этот объект Window используется также для развертывания, свертывания, скрытия или восстановления главного окна среды разработчика Visual Basic.


Свойство Major

Возвращает значение типа Long, содержащее основной номер версии адресуемой библиотеки типов.  Только для чтения.

Дополнительные сведения

Значение, возвращаемое свойством Major, соответствует основному номеру версии, сохраненному в библиотеке типов, на которую задается ссылка.


Свойство Minor

Возвращает значение типа Long, содержащее дополнительный номер версии адресуемой библиотеки типов.  Только для чтения.

Дополнительные сведения

Значение, возвращаемое свойством Minor, соответствует дополнительному номеру версии, сохраненному в библиотеке типов, на которую задается ссылка.


Свойство Mode

Возвращает значение, определяющее режим указанного проекта.  Только для чтения.

Возвращаемые значения

Свойство Mode возвращает следующие значения:

Константа	Описание
vbext_vm_RunMode	Указанный проект находится в режиме выполнения.
vbext_vm_BreakMode	Указанный проект находится в режиме прерывания.
vbext_vm_DesignMode	Указанный проект находится в режиме конструктора.


Свойство Name

Возвращает или задает значение типа String, содержащее имя, которое используется в программе для идентификации объекта.  Для объектов VBProject и VBComponent это свойство доступно для чтения/записи; для объекта Property и объекта Reference свойство доступно только для чтения.

Дополнительные сведения

В следующей таблице приводится описание способов применения свойства Name для разных объектов.

Объект	Применение свойства Name
VBProject	Возвращает или задает имя активного проекта.
VBComponent	Возвращает или задает имя компонента.  При попытке указать в свойстве Name уже используемое или недопустимое имя возникает ошибка.
Property	Возвращает имя свойства в том виде, как оно выводится в окне свойств.  Это же значения используется для индексации семейства Properties.  Это имя задать невозможно.
Reference	Возвращает имя ссылки в программе.  Это имя задать невозможно
Имя, которое новые объекты получаю по умолчанию, образуется из типа объекта и уникального целого числа.  Например, первый новый объект Form получает имя Form1, следующий объект Form имя Form2, а третий элемент управления, являющийся полем (TextBox) в форме имя TextBox3.

Имя объекта (значение свойства Name) должно начинаться с буквы и содержать не более 40 символов.  В имя можно включать цифры и символы подчеркивания (_), но нельзя включать пробелы или знаки препинания.  Имена форм и модулей не должны совпадать с именами других общих объектов, таких как Clipboard, Screen или App.  Хотя в качестве значения свойства Name можно указать ключевое слово, имя свойства или имя другого объекта, делать это не рекомендуется во избежание конфликтов имен в программе.


Свойство NumIndices

Возвращает количество индексов для свойства, возвращаемого объектом Property.

Дополнительные сведения

Значением свойства NumIndices может быть любое целое число от 0 до 4.  Для большинства свойств свойство NumIndices возвращает значение 0.  Свойства, индексируемые обычным образом, возвращают значение 1.  Массивы свойств могут возвращать значение 2.


Свойство Object

Возвращает или задает значение объекта, который возвращается свойством.  Чтение/запись.

Дополнительные сведения

Если возвращается объект, то свойство Object позволяет задать или возвратить значение этого объекта.


Свойство Parent

Возвращает объект или семейство, которое содержит другой объект или семейство.  Только для чтения.

Дополнительные сведения

Для большинства объектов определено либо свойство Parent, либо свойство Collection, указывающее на родительский объект, который данный объект имеет в иерархии объектов.  Свойство Collection используется, если родительский объект является семейств.

Свойство Parent используют для доступа к свойствам, методам и элементам управления родительского объекта.


Свойство Protection

Возвращает значение, указывающее состояние защиты проекта.  Только для чтения.

Возвращаемые значения

Свойство Protection возвращает следующие значения:

Константа	Описание
vbext_Protection	Указанный проект защищен.
vbext_NoProtection	Указанный проект не защищен.
vbext_Locked	Указанный проект блокирован.


Свойство ReferencesEvents

Возвращает объект ReferencesEvents.  Только для чтения.

Значения

Аргумент, передаваемый в свойство ReferencesEvents, может иметь следующие значения:

Аргумент	Описание
проектVB	Если аргумент проектVB имеет значение Nothing, возвращенный объект будет передавать события в семейства References всех объектов VBProject в семействе VBProjects. Если аргумент проектVB указывает на допустимый объект VBProject, то возвращенный объект будет передавать события только в семейство References этого проекта.
Дополнительные сведения

Свойство ReferencesEvents принимает аргумент и возвращает объект-источник события.  Объект ReferencesEvents является источником событий, которые генерируются при добавлении или удалении ссылок.


Свойство Top

Возвращает или задает значение типа Single, указывающее положение верхнего края окна на экране в единицах твип.  Чтение/запись.

Дополнительные сведения

Значение, возвращаемое свойством Top, зависит от того, является ли окно закрепленным окном, связанным окном или выводится в режиме закрепления.

Примечание.   Изменение значения свойства Top для связанного или закрепленного окна не имеет последствий, пока окно остается связанным или закрепленным.


Свойство TopLine

Возвращает значение типа Long, указывающее номер верхней строки, которая выводится в области программы, или задающее номер строки, которая является верхней в области программы.  Чтение/запись.

Дополнительные сведения

Свойство TopLine возвращает или задает номер строки, которая выводится верхней в области программы.  Например, чтобы первой строкой в области программы была строка с номером 25, следует задать для свойства TopLine значение 25.

Значение свойства TopLine должно быть целым положительным числом.  Если для свойства TopLine задается значение, превышающее число строк в программе, то значением этого свойства становится номер последней строки.


Свойство Type

Возвращает числовое или строковое значение, определяющее тип объекта.  Только для чтения.

Возвращаемые значения

Значения свойства Type объекта Window перечислены в следующей таблице:

Константа	Значение	Описание
vbext_wt_CodeWindow	0	Окно программы
vbext_wt_Designer	1	Окно конструктора
vbext_wt_Browser	2	Окно поиска объекта
vbext_wt_Watch	3	Область контрольных значений
vbext_wt_Locals	4	Национальные настройки
vbext_wt_Immediate	5	Область проверки
vbext_wt_ProjectWindow	6	Окно проекта
vbext_wt_PropertyWindow	7	Окно свойств
vbext_wt_Find	8	Диалоговое окно поиска
vbext_wt_FindReplace	9	Диалоговое окно поиска и замены
vbext_wt_Toolbox	10	Набор инструментов
vbext_wt_LinkedWindowFrame	11	Рамка связанных окон
vbext_wt_MainWindow	12	Главное окно
vbext_wt_Preview	13	Окно предварительного просмотра
vbext_wt_ColorPalette	14	Окно палитры цветов
Значения свойства Type объекта VBComponent перечислены в следующей таблице:

Константа	Описание
vbext_ct_ClassModule	Модуль класса
vbext_ct_MSForm	Форма Microsoft
vbext_ct_StdModule	Стандартный модуль
vbext_ct_Document	Модуль документа
Значения свойства Type объекта Reference перечислены в следующей таблице:

Константа	Описание
vbext_rt_TypeLib	Библиотека типов
vbext_rt_Project	Проект


Свойство Value

Возвращает или задает значение типа Variant, определяющее значение свойства.  Чтение/запись.

Дополнительные сведения

Поскольку свойство Value возвращает значение типа Variant, оно обеспечивает доступ к любому свойству.  Для доступа к спискам следует использовать свойство IndexedValue.

Если свойство, представляемое объектом Property, доступно для чтения/записи, свойство Value также доступно для чтения/записи.  Если свойство доступно только для чтения, попытка задать для него значение свойства Value приводит к ошибке.  Если свойство допускает только запись, попытка возвратить значение свойства Value приводит к ошибке.

Свойство Value является используемым по умолчанию свойством объекта Property.


Свойство VBE

Возвращает корневой объект VBE.  Только для чтения.

Дополнительные сведения

Все объекты имеют свойство VBE, указывающее на корневой объект VBE.


Свойство Version

Возвращает значение типа String, содержащее версию языка Visual Basic для приложений (VBA), используемую приложением.  Только для чтения.

Дополнительные сведения

Значение свойства Version является строкой, содержащей одну или две цифры, точку и еще две цифры; остальная часть строки может содержать любой текст или цифры.


Свойство Visible

Для объекта Window возвращает или задает значение типа Boolean, указывающее, является ли окно видимым.  Чтение/запись.  Для объекта CodePane возвращает значение типа Boolean, указывающее, является ли видимой область программы в окне.  Только для чтения.

Возвращаемые значения

Свойство Visible возвращает следующие значения:

Значение	Описание
True	(По умолчанию).  Объект является видимым.
False	Объект является скрытым.


Свойство Width

Возвращает или задает значение типа Single, содержащее ширину окна твип.  Чтение/запись.

Дополнительные сведения

Изменение значения свойства Width для связанного или закрепленного окна не имеет последствий, пока окно остается связанным или закрепленным.


Свойство Window

Возвращает окно, в котором выводится область программы.  Только для чтения.


Свойство WindowState

Возвращает или задает числовое значение, определяющее вид окна.  Чтение/запись.

Значения

Свойство WindowState возвращает или задает следующие значения:

Константа	Значение	Описание
vbext_ws_Normal	0	(По умолчанию).  Обычное окно.
vbext_ws_Min	1	Окно свернуто в значок.
vbext_ws_Max	2	Окно развернуто до максимального размера.


Пример использования свойства ActiveCodePane

В данном примере свойства ActiveCodePane и TopLine используются для определения номера первой строки активной области окна программы.

Debug.Print Application.VBE.ActiveCodePane.TopLine


Пример использования свойства ActiveVBProject

В следующем примере свойство ActiveVBProject используется для определения имени активного проекта.

Debug.Print Application.VBE.ActiveVBProject.Name


Пример использования свойства ActiveWindow

В следующем примере свойство ActiveWindow используется для определения заголовка активного окна.

Debug.Print Application.VBE.ActiveWindow.Caption


Пример использования свойства BuiltIn

В следующем примере свойство BuiltIn используется для возвращения переменной типа Boolean, указывающей, является ли некоторая ссылка в активном проекте встроенной.

Debug.Print Application.VBE.ActiveVBProject.References(1).BuiltIn


Пример использования свойства Caption

В следующем примере свойство Caption используется для вывода на экран заголовка активного окна.

Debug.Print Application.VBE.ActiveWindow.Caption


Пример использования свойства CodeModule

В следующем примере свойства CodeModule и CountOfLines используются для определения числа строк в указанном программном модуле.

Debug.Print Application.VBE.ActiveVBProject.VBComponents(6).CodeModule.CountOfLines


Пример использования свойства CodePane

В данном примере свойства CodePane и TopLine используются для вывода на экран номера первой строки в программном модуле выделенного объекта VBComponent.

Debug.Print Application.VBE.SelectedVBComponent.CodeModule.CodePane.TopLine


Пример использования свойства CodePanes

В данном примере свойства CodePanes и TopLine используются для вывода на экран номера первой строки указанной области окна программы

Debug.Print Application.VBE.CodePanes(3).TopLine


Пример использования свойства CodePaneView

В следующем примере свойство CodePaneView используется для возвращения значения, определяющего, выводится ли указанная область окна программы при просмотре процедуры или полного модуля.

Debug.Print Application.VBE.CodePanes(3).CodePaneView


Пример использования свойства Collection

В следующем примере свойства Collection и Count используются для определения номеров объектов, содержащихся в активном проекте и рассматриваемых как семейство объектов.

Debug.Print Application.VBE.ActiveVBProject.Collection.Count


Пример использования свойства CommandBarEvents

В данном примере приводится программа, использующая свойство CommandBarEvents. Это свойство применяется в программах для обработки нажатия кнопки мыши в панели команд.

Private WithEvents ce As CommandBarEvents

Sub Test()

    Dim c As CommandBarControl

    Set c = Application.VBE.CommandBars("Сервис").Controls(1)

    Set ce = Application.VBE.Events.CommandBarEvents(c)

End Sub

Private Sub ce_Click(ByVal CommandBarControl As Object, Handled As Boolean, CancelDefault As Boolean)

    ' Место для программы обработки событий.

End Sub


Пример использования свойства Count

В следующем примере свойство Count используется для определения числа объектов VBComponent в указанном проекте.

Debug.Print Application.VBE.VBProjects(1).VBComponents.Count


Пример использования свойства CountOfDeclarationLines

В следующем примере свойство CountOfDeclarationLines используется для определения числа строк описания в указанной области окна программы.

Debug.Print Application.VBE.CodePanes(2).CodeModule.CountOfDeclarationLines


Пример использования свойства CountOfLines

В следующем примере свойство CountOfLines используется для определения полного числа строк в указанной области окна программы.

Application.VBE.CodePanes(2).CodeModule.CountOfLines


Пример использования свойства CountOfVisibleLines

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

Debug.Print Application.VBE.Codepanes(3).CountOfVisibleLines


Пример использования свойства Description

В первом из приведенных примеров свойство Description используется, чтобы задать описание для указанного проект. Затем описание выводится на печать для проверки выполнения предыдущей операции.

Во втором примере свойство Description используется для возвращения подробных имен указанных объектов Reference некоторого проекта.

Application.VBE.VBProjects(1).Description = "Горячие пирожки"

Debug.Print Application.VBE.VBProjects(1).Description

Debug.Print Application.VBE.VBProjects(1).References(1).Description

Debug.Print Application.VBE.VBProjects(1).References(2).Description


Пример использования свойства Designer

В следующем примере свойства Designer и Count используются для определения числа элементов управления в форме. При этом окно, содержащее данную форму, должно быть выделено. Объектом свойства Designer (конструктор) является сама форма.

Debug.Print Application.VBE.SelectVBComponent.Designer.Controls.Count


Пример использования свойства DesignerWindow

В следующем примере свойства DesignerWindow и Visibile использованы, чтобы определить, является ли некоторый конструктор видимым. При этом объект VBComponent должен представлять собой форму.

Debug.Print Application.VBE.VBProjects(1).VBComponents(1).DesignerWindow.Visible


Пример использования свойства FullPath

В следующем примере свойство FullPath используется для возвращения полного пути к библиотеке объектов для указанной ссылки.

Debug.Print Application.VBE.ActiveVBProject.References(1).FullPath


Пример использования свойства GUID

В следующем примере свойство GUID используется для возвращения кода GUID для указанного объекта Reference конкретного проекта.

Debug.Print Application.VBE.VBProjects(1).References(1).GUID


Пример использования свойства HasOpenDesigner

В следующем примере свойство HasOpenDesigner использовано, чтобы определить, имеет ли указанный компонент некоторого проекта (в данном случае форма) открытый конструктор.

Debug.Print Application.VBE.VBProjects(1).VBComponents(1).HasOpenDesigner


Пример использования свойств Height и Width

В следующем примере свойства Height и Width используются для определения высоты и ширины (в твипах) некоторого окна. Когда указанное окно связано с другим окном или закреплено в главном окне, параметры этих свойств изменяются, поскольку в этих случаях они относятся к объекту Window, в котором исходное окно связано или закреплено.

Debug.Print Application.VBE.Windows(9).Height

Debug.Print Application.VBE.Windows(9).Width


Пример использования свойства HelpContextID

В следующем примере свойство HelpContextID используется для возвращения идентификатора контекстной справки для файла справочной системы, соответствующего проекту.

Debug.Print Application.VBE.VBProjects(1).HelpContextID


Пример использования свойства HelpFile

В следующем примере свойство HelpFile используется для введения файла справочной системы в проект. Затем полный путь данного файла выводится на печать для проверки выполнения описанной операции.

Application.VBE.VBProjects(1).HelpFile = "C:\HelpStuff\veenob3.hlp"

Debug.Print Application.VBE.VBProjects(1).HelpFile


Пример использования свойства IsBroken

В следующем примере свойство IsBroken используется для возвращения значения, которое определяет, указанный объект Reference в некотором проекте неразрешенной ссылкой.

Debug.Print Application.VBE.vbprojects(1).References(1).IsBroken


Пример использования свойств Left и Top

В следующем примере свойства Left и Top используются для определения координат верхнего левого угла некоторого окна (в твипах). Когда указанное окно связано с другим окном или закреплено в главном окне, параметры данных свойств изменяются, поскольку в этих случаях они относятся к объекту Window, в котором исходное окно связано или закреплено.

Debug.Print Application.VBE.Windows(9).Left

Debug.Print Application.VBE.Windows(9).Top


Пример использования свойства MainWindow

В следующем примере свойство MainWindow используется для определения объекта Window, представляющего главное окно. Затем заголовок главного окна выводится на печать.

Debug.Print Application.VBE.MainWindow.Caption


Пример использования свойства Major

В следующем примере свойство Major используется для возвращения номера максимальной версии указанного объекта Reference в некотором проекте.

Debug.Print Application.VBE.VBProjects(1).References(1).Major


Пример использования свойства Minor

В следующем примере свойство Minor используется для возвращения номера минимальной версии указанного объекта Reference в некотором проекте.

Debug.Print Application.VBE.VBProjects(1).References(1).Minor


Пример использования свойства Mode

В следующем примере свойство Mode используется для определения режима активного проекта. При этом возвращается заранее определенная константа, соответствующая режиму проекта.

Debug.Print Application.VBE.ActiveVBProject.Mode


Пример использования свойства Name

В следующем примере свойство Name используется для определения имени указанного компонента семейства VBComponents в некотором проекте.

Debug.Print Application.VBE.VBProjects(1).VBComponents(1).Name


Пример использования свойства NumIndices

В следующем примере свойство NumIndices используется для возвращения числа индексов, относящихся к указанному свойству определенного объекта VBComponent.

Debug.Print Application.VBE.VBProjects(1).VBComponents(1).Properties(40).NumIndices


Пример использования свойства Object

В следующем примере имя значка вводится в список  значков указанного объекта, представляющего собой форму.

Set Application.VBE.ActiveVBProject.VBComponents(1).Properties("Значок").Object = LoadPicture("Baseball.ico")


Пример использования свойства Parent

В следующем примере свойство Parent используется для возвращения имени объекта, который в иерархии объектов является родительским для указанного объекта.

Debug.Print Application.VBE.ActiveVBProject.VBComponents.Parent.Name


Пример использования свойства Protection

В следующем примере свойство Protection используется для возвращения значения, которое указывает, защищен ли проект. Возвращаемое значение представляет собой заранее определенную константу, соответствующую статусу проекта.

Debug.Print Application.VBE.ActiveVBProject.Protection


Пример использования свойства ReferencesEvents

В данном примере приводится программа, использующая свойство ReferencesEvents. Это свойство применяется в программе обработки событий для добавления или удаления ссылок.

Private WithEvents X As ReferencesEvents

Sub Test()

    Set X = Application.VBE.Events.ReferencesEvents

End Sub

Private Sub X_ItemAdded(ByVal Reference As VBIDE.Reference)

    ' Место для программы добавления элемента.

End Sub

Private Sub X_ItemRemoved(ByVal Reference As VBIDE.Reference)

    ' Место для программы удаления элемента.

End Sub


Пример использования свойства Saved

В следующем примере свойство Saved используется для возвращения переменной типа Boolean, указывающей, был ли указанный проект сохранен в текущем состоянии.

Debug.Print Application.VBE.VBProjects(1).Saved


Пример использования свойства SelectedVBComponent

В следующем примере свойство SelectedVBComponent используется для определения выделенного компонента.

Debug.Print Application.VBE.SelectedVBComponent.Name


Пример использования свойства TopLine

В данном примере свойство TopLine используется для возвращения номера первой строки указанной области окна программы.

Debug.Print Application.VBE.CodePanes(3).TopLine


Пример использования свойства Type

В следующем примере свойство Type используется для возвращения значения, соответствующего типу указанного компонента семейства VBComponents в некотором проекте. Возвращаемое значение представляет собой константу, определенную заранее для одного из объектных типов компонентов.

Debug.Print Application.VBE.VBProjects(1).VBComponents(1).Type


Пример использования свойства Value

В следующем примере свойство Value используется для возвращения значения указанного свойства одного из компонентов семейства VBComponents.

Debug.Print Application.VBE. ActiveVBProject.VBComponents(1).Properties("AcceptLabelsInFormulas").Value


Пример использования свойства VBE

В следующем примере свойства VBE и Name используются для определения имени активного проекта.

Debug.Print Application.VBE.ActiveVBProject.Name


Пример использования свойства Version

В следующем примере свойство Version используется для определения номера версии главного приложения.

Debug.Print Application.VBE.Version


Пример использования свойства Visible

В следующем примере свойство Visible используется для возвращения переменной типа Boolean, которая показывает, является ли указанное окно видимым.

Debug.Print Application.VBE.Windows(9).Visible


Пример использования свойства Window

В следующем примере свойства Window и Caption используются для возвращения заголовка указанной области окна программы.

Debug.Print Application.VBE.CodePanes(1).Window.Caption


Пример использования свойства WindowState

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

Debug.Print Application.VBE.Windows(9).WindowState


Объект CodeModule

Представляет программу, определенную для таких компонентов проекта как форма, класс или документ.

Дополнительные сведения

Объект CodeModule используется для изменения (добавления, удаления или изменения) программы, определенной для компонента.

Каждый компонент связывается с одним объектом CodeModule. Однако объект CodeModule может быть связан с несколькими областями программы.

Методы, определенные для объекта CodeModule, позволяют построчно обрабатывать программы и возвращать информацию о тексте программы.  Например, метод AddFromString используют для добавления текста в модуль.  Метод AddFromString помещает текст непосредственно перед первой процедурой в модуле или в конец модуля, если в модуле нет процедур.

Свойство Parent позволяет возвратить объект VBComponent, связанный с программным модулем.


Объект CommandBarEvents

Возвращается свойством CommandBarEvents.  Объект CommandBarEvents запускает событие при выборе элемента управления на панели инструментов.

Дополнительные сведения

Объект CommandBarEvents возвращается свойством CommandBarEvents объекта Events.  В интерфейсе возвращенного объекта имеется одно событие нажатия кнопки.  Для обработки этого события используется описание WithEvents.


Семейство CommandBars

Содержит все панели команд в проекте, включая панели команд, поддерживающие контекстные меню.

Дополнительные сведения

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


Объект VBComponent

Представляет компонент, содержащийся в проекте, например, модуль класса или стандартном модуле.

Дополнительные сведения

Объект VBComponent используют для доступа к программному модулю, связанному с компонентом, или для изменения значений свойств компонента.

Свойство Type позволяет определить тип компонента, ссылка на который содержится в объекте VBComponent.  Для определения семейства, в которое входит компонент, используется свойство Collection.


Семейство VBComponents

Представляет компоненты, содержащиеся в проекте.

Дополнительные сведения

Семейство VBComponents используется для доступа, добавления или удаления компонентов проекта, таких как форма, модуль или класс.  Семейство VBComponents является стандартным семейством, которое может быть использовано в блоке For Each.

Свойство Parent возвращает проект, в который входит семейство VBComponents.

В языке Visual Basic для приложений (VBA) поддерживается метод Import, позволяющий добавлять в проект компонент из файла.


Объект CodePane

Представляет область программы.

Дополнительные сведения

Объект CodePane используется для управления положением видимого текста или выделенного текста, выводящегося в области программы.

Для того чтобы сделать видимой указанную область программы, используют метод Show.  Метод SetSelection задает, а метод GetSelection возвращает положение выделенного фрагмента в области программы.


Семейство CodePanes

Содержит активные области программы из объекта VBE.

Дополнительные сведения

Семейство CodePanes обеспечивает доступ к открытым областям программы в проекте.

Для возвращения числа активных областей программы в семействе используют свойство Count.


Объект Events

Содержит свойства, обеспечивающие подключение надстроек ко всем событиям Visual Basic для приложений (VBA).

Дополнительные сведения

Объект Events поддерживает свойства, которые возвращают объекты-источники событий.  Объекты-источники событий, возвращаемые этими свойствами, информирую пользователя об изменениях в среде Visual Basic для приложений (VBA).

Свойства объекта Events возвращают объекты, тип которых совпадает с именами свойств.  Например, свойство CommandBarEvents возвращает объект CommandBarEvents.


Семейство LinkedWindows

Содержит все связанные окна в рамке связанных окон.

Дополнительные сведения

Семейство LinkedWindows используют для изменения состояния закрепленных и связанных окон в среде разработчика.

Свойство LinkedWindowFrame объекта Window возвращает объект Window, содержащий допустимое семейство LinkedWindows.

Рамки связанных окон содержат все окна, которые могут быть связаны или закреплены.  В их число входят все окна за исключением окна программы, окна конструктора, окна просмотра объектов и окна поиска и замены.

Если все области из рамки связанных окон перемещаются в другое окно, то пустая рамка связанных окон уничтожается.  Однако главное окно, из которого удалены все области, не уничтожается.

Чтобы проверить, является ли окно видимым, или сделать окно видимым, используют свойство Visible.

Для добавления окна в семейство текущих связанных окон используется метод Add.  Окно, которое является областью одной рамки связанных окон, может быть добавлено в другую рамку связанных окон.  Метод Remove используется для удаления окна из текущих связанных окон; в результате окно становится несвязанным или незакрепленным.

Семейство LinkedWindows используют для закрепления окон в главном окне или для снятия закрепления.


Объект Property

Представляет свойства объекта, которые являются доступными для просмотра в окне свойств любого конкретного компонента.

Дополнительные сведения

Свойство Value объекта Property задает или возвращает значение свойства компонента.

Все компоненты имеют по крайней мере одно свойство Name.  Чтобы задать или возвратить значение свойства, используется свойство Value объекта Property.  Свойство Value возвращает значение типа Variant соответствующего подтипа.  Если возвращаемое значение представляет объект, свойство Value возвращает семейство Properties, содержащее объекты Property, представляющие отдельные свойства объект.  Для доступа к каждому из объектов Property в возвращенном семействе Properties используют метод Item.

Если значение, возвращаемое объектом Property, представляет объект, пользователь имеет возможность использовать свойство Object, чтобы указать новый объект в значении объекта Property.


Семейство Properties

Представляет свойства объекта.

Дополнительные сведения

Семейство Properties обеспечивает доступ к свойствам, отображаемым в окне свойств.  Каждому свойству, выводящемуся в окне свойств, соответствует объект в семействе Properties.


Объект Reference

Представляет ссылку на библиотеку типов или проект.

Дополнительные сведения

Объект Reference используют для проверки, является ли ссылка действительной.

Если ссылка более не является действительной, свойство IsBroken возвращает значение True.  Если ссылка является стандартной ссылкой, которая не может быть добавлена или удалена, свойство BuiltIn возвращает значение True.  При проверке правильности добавляемой или удаляемой ссылки следует использовать свойство Name.


Семейство References

Представляет набор ссылок в проекте.

Дополнительные сведения

Семейство References используют при добавлении или удалении ссылок.  Семейство References совпадает с набором ссылок, выделенных в диалоговом окне Ссылки.


Объект ReferencesEvents

Возвращается свойством ReferencesEvents.

Дополнительные сведения

Объект ReferencesEvents является источником событий, которые возникают при добавлении ссылки или ее удалении из проекта. При добавлении ссылки в проект возникает событие ItemAdded (добавление элемента).  При удалении ссылки возникает событие ItemRemoved (удаление элемента).


Объект VBE

Корневой объект, который содержит все остальные объекты и семейства, определенные в языке Visual Basic для приложений (VBA).

Дополнительные сведения

Для доступа к объектам, содержащимся в объекте VBE, используются следующие семейства:

•	Семейство VBProjects используется для доступа к семейству проектов.

•	Семейство Windows используется для доступа к семейству окон.

•	Семейство CodePanes используется для доступа к семейству областей программы.

•	Семейство CommandBars используется для доступа к семейству панелей команд.

•	Семейство Events используется для доступа к свойствам, которые активизируют подключение надстроек ко всем событиям Visual Basic для приложений (VBA).

Для возвращения активного компонента используется свойство SelectedVBComponent.  Активным компонентом является компонент, выбранный в окне проекта.  Если элемент, выделенный в окне проекта, не является компонентом, свойство SelectedVBComponent возвращает значение Nothing.

Примечание.   Для каждого объекта в данной модели объектов определено свойство VBE, указывающее на объект VBE.


Объект VBProject

Представляет проект.

Дополнительные сведения

Объект VBProject используется для задания свойств проекта, для доступа к семейству VBComponents, а также для доступа к семейству References.


Семейство VBProjects

Представляет все проекты, открытые в среде разработчика.

Дополнительные сведения

Семейство VBProjects используется для доступа к конкретным проектам в данном экземпляре среды разработчика.  Семейство VBProjects является стандартным семейством, которое может быть использовано в блоке For Each.


Объект Window

Представляет окно в среде разработчика.

Дополнительные сведения

Объект Window используется для вывода на экран, скрытия или размещения окон.

Для закрытия окна, входящего в семейство Windows, используют метод Close.  Метод Close действует на окна разных типов следующим образом:

Окно	Результат вызова метода Close
Окно программы	Удаляет окно из семейства Windows.
Окно конструктора	Удаляет окно из семейства Windows.
Объекты Window типа рамки связанных окон	Преобразует окна в отдельные несвязанные окна.
Примечание.   Вызов метода Close для окна программы или окна конструктора приводит к фактическому закрытию окна.  Заданное для свойства Visible значение False делает окно скрытым, но не закрывает его.  Вызов метода Close для окон среды разработчика, таких как окно проекта или окно свойств, приводит к тем же результатам, что и задание значения False для свойства Visible.

Для перевода фокуса в окно следует использовать метод SetFocus.

Свойство Visible позволяет задавать или возвращать состояние видимости окна.

Чтобы проверить тип окна, с которым проводится работа, следует использовать свойство Type.  Если имеется несколько окон одного типа, например, несколько окон конструктора, то определить конкретное окно позволяет свойство Caption.  Кроме того, нужное окно можно найти с помощью свойства DesignerWindow объекта VBComponent или свойства Window объекта CodePane.


Семейство Windows

Содержит все открытые или постоянные окна.

Дополнительные сведения

Семейство Windows обеспечивает доступ к объектам Window.

В семейство Windows входит постоянный набор окон, которые всегда являются доступными в семействе, таких как окно проекта, окно свойств, а также набор окон, представляющих все открытые окна программ и окна конструктора.  При открытии окна программы или окна конструктора в семейство Windows добавляется новый компонент.  Закрытие окна программы или окна конструктора приводит к удалению компонента из семейства Windows.  При закрытии постоянного окна среды разработчика соответствующий объект не удаляется из семейства, но окно делается невидимым.