StarOffice Basic

aus Wikipedia, der freien Enzyklopädie
(Weitergeleitet von StarBasic)
Wechseln zu: Navigation, Suche
Dieser Artikel oder Abschnitt bedarf einer Überarbeitung. Näheres ist auf der Diskussionsseite angegeben. Hilf mit, ihn zu verbessern, und entferne anschließend diese Markierung.

StarOffice Basic (auch bekannt unter der Bezeichnung StarBasic und OOoBasic) ist ein BASIC-Dialekt, der in die Office-Suiten OpenOffice.org/LibreOffice und Oracle Open Office und dem darauf basierenden IBM Lotus Symphony integriert ist.

Obwohl StarBasic selbst eine Ähnlichkeit zu anderen Basic-Dialekten, wie Microsofts VBA hat, unterscheidet sich das Application Programming Interface (API) deutlich, wie das nachfolgende Beispiel eines Makros zeigt:

 Sub ParaCount
 '
 ' Absätze in einem Textdokument zählen
 '
   Dim Doc As Object, Enum As Object, Count As Long
   Doc = ThisComponent
 ' Ist dies ein Textdokument?
   If Not Doc.SupportsService("com.sun.star.text.TextDocument") Then
     MsgBox "Dieses Makro muss aus einem Textdokument ausgeführt werden", 64, "Error"
     Exit Sub
   End If
   Count = 0
 ' Jeden Teil des Dokuments überprüfen - Absatz oder Tabelle?
   Enum = Doc.Text.CreateEnumeration
   While Enum.HasMoreElements
     TextEl = Enum.NextElement
 ' Ist dieser Teil des Dokuments ein Absatz?
     If TextEl.SupportsService("com.sun.star.text.Paragraph") Then 
     Count = Count + 1
     End If
   Wend
 'Ergebnis anzeigen:
   MsgBox Count, 0, "Anzahl der Absätze"
 End Sub

[Bearbeiten] Weblinks

[Bearbeiten] BASIC-Macros

[Bearbeiten] StarOffice/OpenOffice.org API

Meine Werkzeuge
Namensräume

Varianten
Aktionen
Navigation
Mitmachen
Drucken/exportieren
Werkzeuge
In anderen Sprachen