OpenOffice Basic - OpenOffice Basic

OpenOffice Basic (ранее известный как StarOffice Basic или StarBasic или же OOoBasic) является диалектом язык программирования БАЗОВЫЙ что возникло с StarOffice офисная одежда и распространяться через OpenOffice.org и производные, такие как LibreOffice (где он известен как LibreOffice Basic). Язык - это предметно-ориентированный язык программирования который специально обслуживает набор приложений OpenOffice.

Пример

Хотя OpenOffice Basic похож на другие диалекты BASIC, такие как Microsoft с Visual Basic для приложений (VBA), интерфейс прикладного программирования (API) сильно отличается, как в приведенном ниже примере макрос иллюстрирует. Хотя существует гораздо более простой способ получить свойство документа «количество абзацев», в примере показаны основные методы последовательного доступа к каждому абзацу текстового документа.

Sub ParaCount''Подсчитать количество абзацев в текстовом документе'    Тусклый Док В качестве Объект, Enum В качестве Объект, TextEl В качестве Объект, Считать В качестве Длинный    Док = ThisComponent«Это текстовый документ?    Если Нет Док.SupportsService("com.sun.star.text.TextDocument") потом        MsgBox «Этот макрос должен запускаться из текстового документа», 64, "Ошибка"        Выход Sub    Конец Если    Считать = 0«Изучите каждый компонент - параграф или таблицу?    Enum = Док.Текст.CreateEnumeration    Пока Enum.HasMoreElements        TextEl = Enum.NextElement'Является ли компонент абзацем?        Если TextEl.SupportsService("com.sun.star.text.Paragraph") потом            Считать = Считать + 1        Конец Если    Wend'Показать результат    MsgBox Считать, 0, "Количество абзацев"Конец Sub

Смотрите также

дальнейшее чтение

  • Стейнберг, Джеймс. Open Office Basic: введение. Независимая издательская платформа CreateSpace. ISBN  978-1481270939.

внешняя ссылка