Функция DocumentProtection()
Возвращает значение, задающее режим защиты активного документа. Чтобы изменить его, используйте ToolsProtectDocument. В
Word 6.0, DocumentProtection() недоступна и генерирует ошибку.
Возвращаемые значения
0 (нуль) Документ не защищен.
1 Пользователь может выбирать и модифицировать текст в поле формы.
2 Пользователь может только добавить аннотации.
3 Пользователь может выбирать и редактировать текст, но все изменения трассируются с маркерами изменений.
Задает, что текст, который вы хотите найти или заменить, выделен.
EditFindHighlight. Когда этот оператор следует за EditFind или EditReplace, в которых параметр .Format установлен в 1, то задает, что текст, который вы хотите найти выделен яркостью. Word ищет любой выделенный текст, даже если в одном документе для выделения были использованы различные цвета. В Word 6.0, EditFindHighlight недоступна и генерирует ошибку.
Пример
Находятся все вхождения в документ выделенного текста, убирается выделение, а сам текст делается полужирным.
EditFindClearFormatting
EditReplaceClearFormatting
EditFindHighlight
EditReplaceFont .Bold = 1
EditReplaceNotHighlight
EditReplace .Find = "", .Replace = "", .Format = 1, .ReplaceAll
Задает, что текст, который вы хотите найти или заменить, не выделен.
EditFindNotHighlight. Когда этот оператор следует за EditFind или EditReplace, в которых параметр .Format установлен в 1, то задает, что текст, который вы хотите найти не выделен яркостью. В Word 6.0, EditFindNotHighlight недоступна и генерирует ошибку.
На этом мы завершаем цикл занятий, посвященный языку WordBasic. Надеюсь, что, как и мне, они оказались вам в чем-то полезны.
ОБ АВТОРЕ
Эдуард Михайлович Пройдаков – главный редактор еженедельника PC Week/RE. Контактный телефон: 237-89-01, E-Mail: chief@pcweek.ru.
Литература
1. М. Штарке, Р. Болльманн. Word для Windows 2.0. Пер. с нем. — К.: BHV, 1993 г. — 440 с.
2. К.
Мусин.
Содержание
Язык WordBasic: практический подход.........................................................................
Введение (Занятие №1).......................................................................................................................
Советы..........................................................................................................................................................
Элементы языка..................................................................................................................................
Занятие 2....................................................................................................................................................
Встроенные функции языка WordBasic.......................................................................
Взаимодействие с пользователем..................................................................................
Специфика WordBasic (Занятие 3)........................................................................................
Выделение текста...............................................................................................................................
Прибамбасы............................................................................................................................................
Действия над текстом.................................................................................................................
Форматирование..................................................................................................................................
Форматирование символов............................................................................................................
Операторы Bold, Italic, Underline и Strikethrough.........................................................
Оформление списков.......................................................................................................................
Оператор ToolsBulletListDefault............................................................................................
Работа с языком документа..........................................................................................................
Оператор FontSubstitution............................................................................................................
Оператор SymbolFont........................................................................................................................
Функция Hidden().................................................................................................................................
Оператор ToolsProtectDocument...............................................................................................
Работа с таблицами.......................................................................................................................
Средства навигации по таблице..................................................................................................
Об операции вставки..........................................................................................................................
Работа с таблицами (Занятие №4)........................................................................................
Выделение ячеек таблицы...............................................................................................................
Операции над ячейками...................................................................................................................
Встроенные закладки........................................................................................................................
Операции над закладками..............................................................................................................
Работа с окнами................................................................................................................................
Оператор WindowNewWindow.......................................................................................................
Макрокоманды для макрокоманд....................................................................................
Операторы и функции настройки................................................................................................
Работа со структурой документа....................................................................................
Оператор ViewOutline.......................................................................................................................
Операторы OutlineCollapse и OutlineExpand.....................................................................
Оператор OutlineShowFormat......................................................................................................
Оператор ViewToggleMasterDocument...................................................................................
Рамки.........................................................................................................................................................
Оператор ViewBorderToolbar......................................................................................................
WordBasic: операторы редактирования (Занятие №5).......................................
Работа с Буфером обмена................................................................................................................
Оператор EditFindLang.....................................................................................................................
Работа с каталогами.........................................................................................................................
Оператор CopyFile...............................................................................................................................
Операторы ввода-вывода..............................................................................................................
Из макроса можно работать с файлом. Для этого его нужно открыть, а после завершения всех операций записи, закрыть файл..............................................................................................................................
Open "C:\TMP\DATA.TXT" For Output As #1..........................................................................
Print #1, "Name", "Address", "Occupation"............................................................................
Print #1, "Juan Garcia", "123 Main St", "Accountant"......................................................
Close #1.................................................................................................................................................
Оператор Print позволяет выводить текст, не только в строку статуса, но и на принтер. Для этого нужно открыть файл печати следующим образом:................................................................................
CRLF$ = Chr$(13)+Chr$(10)...........................................................................................................
Open "lpt1.dos" For Output As #1............................................................................................
Print #1, "Тест вывода на печать."; CRLF$............................................................................
Этот оператор не выводит на принтер символ перевода строки (код 0Ah), так что его нужно ставить в конце строки самим..............................................................................................................................................
Функция Lof() возвращает длину открытого файла........................................................
Open "My_news.txt" For Input As #1........................................................................................
Size = Lof(1)..........................................................................................................................................
Print Size; " байт"..............................................................................................................................
Close #1.................................................................................................................................................
Sub MAIN................................................................................................................................................
On Error Goto errors.................................................................................................................
Open "C:\WINWORD\README.DOC" For Input As #1.........................................................
Close #1.................................................................................................................................................
FileOpen .Name = "C:\WINWORD\README.DOC".................................................................
Errors:..................................................................................................................................................
If err = 55 Then MsgBox "File Already Open".......................................................................
Close #1.................................................................................................................................................
End Sub..................................................................................................................................................
FileNew – создает новый документ или шаблон...............................................................
Синтаксис:...........................................................................................................................................
Примеры:................................................................................................................................................
Создать новый документ на базе шаблона Memo1.
Расширение . DOT имени файла является необязательным – вы можете задать либо "MEMO1", либо "MEMO1.DOT."...........................................................
FileNew .Template = "MEMO1".....................................................................................................
Следующий пример создает новый шаблон на базе существующего шаблона Letter3:
FileNew .NewTemplate = 1, .Template = "LETTER3.DOT"..................................................
В этом примере на выполнение запускается "волшебник" Resume:........................
FileNew .Template = "RESUME.WIZ"..........................................................................................
Операторы FileClose.......................................................................................................................
Оператор FileCloseAll...................................................................................................................
Диалоговые окна..............................................................................................................................
Операторы для работы со списками..................................................................................
Работа с документами..............................................................................................................
Оператор LockDocument и функция LockDocument().....................................................
Работа с приложениями.................................................................................................................
Управление элементами интерфейса WinWord.................................................................
Функция Today()................................................................................................................................
Переменные документа и их использование в программе..........................................
Рисование в WordBasic (Занятие №6)..............................................................................
Операторы рисования.....................................................................................................................
Выбор и перемещение объектов.................................................................................................
Оператор DrawSnapToGrid...........................................................................................................
Операторы перемещения рисунка.............................................................................................
Операторы перемещения объектов в стеке...........................................................................
Оператор DrawSetInsertToTextbox........................................................................................
Вспомогательные операторы.....................................................................................................
Использование кнопки записи макро.....................................................................................
Работа с БД............................................................................................................................................
Оператор ToolsRemoveRecordDefault..................................................................................
Оператор ToolsAddRecordDefault..........................................................................................
Работа с формулами.......................................................................................................................
Работа со структурой документа........................................................................................
Операторы изменения уровня.....................................................................................................
Работа с полями (Занятие №7)...............................................................................................
Пример использования полей......................................................................................................
Работа с полями средствами WordBasic...............................................................................
Оператор InsertField.......................................................................................................................
Операторы вставки...........................................................................................................................
Навигация по полям........................................................................................................................
PutFieldData и GetFieldData$()................................................................................................
Операторы блокирования и обновления полей...................................................................
Контроль вывода полей на экран..............................................................................................
WordBasic в Word 7.0 для Windows 95 (Занятие №8)...............................................
Проверка правописания.................................................................................................................
Функция DocumentProtection().................................................................................................
lch=17.11.98 code=162575.................................................................................................................
История книги
Частично материал опубликован в журнале “Мир ПК” (в 1995 г.) и практически полностью был напечатан в журнале “КомпьютерПресс” (в 1997 г.). Книга по ряду обстоятельств так не была закончена. Если у вас есть время и желание – вы можете это сделать, прислав автору свои дополнения. Автор выступит в этом случае просто как редактор и модератор.
