Сохраните проект.

15. Замените содержимое процедуры Show конструктора следующим:

Sub Show()

Dim filename As String Dim x As String

' Получить имя модуля

filename = VBInstance.SelectedVBComponent. Name

' Создать комментарии x =..... & vbCrLf & _

"' Файл: " & vbTab & vbTab & vbTab & _

filename & vbCrLf & _

"' Автор: " & vbTab & vbTab &

" Введите свое имя" & vbTab

"' Создан: " & vbTab & vbTab & _

Format$(Date$, "mm-dd-yyyy") & _

vbCrLf & " ' Описание: " & _

vbCrLf &..... & vbTab & vbTab & _

vbTab & vbTab & "Введите " & _

"описание модуля " & _

vbCrLf & '" Обновления: " &

vbCrLf &..... & vbTab & vbTab & _

vbTab & vbTab & "Нет" & _

vbCrLf &.....

' Вставить комментарии над всеми процедурами и объявлениями With VBInstance.ActiveCodePane

.CodeModule.InsertLines 1, x End With End Sub 16. Удалите содержимое процедуры Hide.

17. Откройте форму frmAddin двойным щелчком в соответствующей строке окна проекта.

18. Удалите с формы кнопки О К и Cancel.

19. Создайте на форме графическое поле. Задайте его свойству Name значение picButton, а свойству Visible — значение False.

ПОДСКАЗКА Значок можно выбрать среди тех, которые поставляются с Visual Basic, или нарисовать свой собственный в стандартном графическом редакторе Paint. Если вам захочется использовать для настройки специальный значок, попробуйте загрузить файл CodeDoc App.bmp с Web-узла издательства «Питер» (www.piter-press.ru).

20. Дважды щелкните на свойстве Picture графического поля в окне свойств.

21. Выберите графическое изображение для кнопки на панели надстроек. В частности, просмотрите файлы в каталоге \Program Files\Microsoft Visual Studio\ Common\Graphics\Bitmaps\Tlbr_Win95.

22. Сохраните проект.

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

Рис. 16.29. Кнопка надстройки на панели Edit

Рассмотрим работу надстройки на следующем несложном примере:

1. Откройте окно программы для модуля, в который добавляются комментарии. В нашем примере следует открыть окно программы для конструктора Connect.

2. Нажмите кнопку CodeDoc - Module на панели Edit.

3. При запуске надстройки в модуль автоматически включается блок комментариев. Его примерный вид показан на рис. 16.30.

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

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

Рис. 16.30. Блок комментариев на уровне модуля

Рис. 16.31. Описание изменений в модуле

Дата добавления: 2015-07-20