OpenOffice Basic
OpenOffice Basic (formerly known as StarOffice Basic or StarBasic or OOoBasic) is a dialect of the programming language BASIC that originated with the StarOffice office suite and spread through OpenOffice.org and derivatives such as Apache OpenOffice and LibreOffice (where it is known as LibreOffice Basic). The language is a domain-specific programming language which specifically serves the OpenOffice application suite.
Example
[edit ]Although OpenOffice Basic is similar to other dialects of BASIC, such as Microsoft's Visual Basic for Applications (VBA), the application programming interface (API) is very different, as the example below of a macro illustrates. While there is a much easier way to obtain the "paragraph count" document property, the example shows the fundamental methods for accessing each paragraph in a text document, sequentially.
SubParaCount ' ' Count number of paragraphs in a text document ' DimDocAsObject,EnumAsObject,TextElAsObject,CountAsLong Doc=ThisComponent ' Is this a text document? IfNotDoc.SupportsService("com.sun.star.text.TextDocument")Then MsgBox"This macro must be run from a text document",64,"Error" ExitSub EndIf Count=0 ' Examine each component - paragraph or table? Enum= Doc.Text.CreateEnumeration WhileEnum.HasMoreElements TextEl=Enum.NextElement ' Is the component a paragraph? IfTextEl.SupportsService("com.sun.star.text.Paragraph")Then Count=Count+1 EndIf Wend 'Display result MsgBoxCount,0,"Paragraph Count" EndSub
See also
[edit ]Further reading
[edit ]- Steinberg, James (2012). Open Office Basic: An Introduction. CreateSpace Independent Publishing Platform. ISBN 978-1481270939.
