WikiDer > 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.

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