Язык WordBasic - практический подход

Качественная компьютерная помощь сидорово - вы этого достойны.

Форматирование


 
К выделенному или выбранному программно блоку текста можно применить все доступные в WinWord способы выравнивания, которые задаются следующими операторами:
 
LeftPara                 по левому краю
CenterPara по центру
JustifyPara             равномерно
RightPara               по правому краю
 
Каждому из этих операторов соответствует одноименная функция, возвращающая результат проверки блока текста на наличие указанного типа выравнивания (см. примеры в Справке)..
SpacePara15  SpacePara15()
SpacePara1   SpacePara1()
SpacePara2   SpacePara2()
 
Пример.
 
Сначала проверим, отцентрирована ли выделенная часть текста полностью или частично. Если нет, то отцентрировать его.
 
Sub MAIN
If CenterPara() = 1 Then
MsgBox “Выделенный текст уже полностью отцентрирован.”
ElseIf CenterPara() = - 1 Then
MsgBox “Текст отцентрирован частично.”
ElseIf CenterPara() = 0 Then
MsgBox “Отцентрировать.”
CenterPara
End If
End Sub
 
Еще один пример:
 
Проверим интерлиньяж в выделенном участке текста и, если он равен одному интервалу, заменим его на двойной.
 
Sub MAIN
A = SpacePara2()
If A < 1 Then
   MsgBox "Установим двойной интервал."
   SpacePara2
Else
   MsgBox "Двойной интервал уже установлен."
End If
End Sub
 
Оператор ChangeCase [On] меняет вид текст в выделенной области из верхнего регистра в нижний и наоборот. Функция ChangeCase().
CharColor НомерЦвета, CharColor(), CharColor$
 



Начало  Назад  Вперед