StarOffice Basic
From Seo Wiki - Search Engine Optimization and Programming Languages
Jump to navigationJump to search
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.
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
See also
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
If you like SEOmastering Site, you can support it by - BTC: bc1qppjcl3c2cyjazy6lepmrv3fh6ke9mxs7zpfky0 , TRC20 and more...
→