StarOffice Basic

StarOffice Basic (also known as StarBasic and OOoBasic) is a dialect of BASIC that is included with the OpenOffice.org and StarOffice office suites.

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.

<source lang="QBasic">

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

</source>

See also

• Comparison of office suites

External links

BASIC Macros

• StarOffice 7 Basic programmer's guide
• StarOffice 8 Programming Guide for BASIC
• OpenOffice.org VBA emulation model project (still in heavy development)
• Andrew Pitonyak's macro information

StarOffice/OpenOffice.org API

• OpenOffice.org/StarOffice API Project Page
  • OpenOffice.org SDK
  • OpenOffice.org 2.0 Developer's Guide
    StarOffice 8 Developer's Guide
  • API reference manual