StarOffice Basic
From Wikipedia, the free encyclopedia
(Redirected from StarBasic)
StarOffice Basic (also known as StarBasic and OOoBasic) is a dialect of BASIC that is included with the OpenOffice.org, StarOffice and LibreOffice office suites.
Contents |
[edit] Example
Although StarBasic itself is similar to other dialects of Basic, such as Microsoft's 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 (see the Talk page (should be moved here)), the example shows the fundamental methods for accessing each paragraph in a text document, sequentially.
Sub ParaCount ' ' Count number of paragraphs in a text document ' Dim Doc As Object, Enum As Object, Count As Long Doc = ThisComponent ' Is this a text document? If Not Doc.SupportsService("com.sun.star.text.TextDocument") Then MsgBox "This macro must be run from a text document", 64, "Error" Exit Sub End If Count = 0 ' Examine each component - paragraph or table? Enum = Doc.Text.CreateEnumeration While Enum.HasMoreElements TextEl = Enum.NextElement ' Is the component a paragraph? If TextEl.SupportsService("com.sun.star.text.Paragraph") Then Count = Count + 1 End If Wend 'Display result MsgBox Count, 0, "Paragraph Count" End Sub
[edit] See also
[edit] External links
[edit] BASIC Macros
- OpenOffice.org BASIC Programming Guide wiki
- OpenOffice.org VBA emulation model project (still in heavy development)
- Andrew Pitonyak's macro information
[edit] StarOffice/OpenOffice.org API
| This programming tool-related article is a stub. You can help Wikipedia by expanding it. |