Öppna Office Basic
OpenOffice Basic (tidigare känd som StarOffice Basic eller StarBasic eller OOoBasic ) är en dialekt av programmeringsspråket BASIC som först dök upp i StarOffice- kontorssviten och blev utbredd med OpenOffice.org-sviten , såväl som derivator av den, som LibreOffice ( där det är känt som LibreOffice Basic ).
Exempel
Även om OpenOffice Basic i sig liknar andra BASIC-dialekter som Microsoft VBA , är dess API väldigt annorlunda, som visas i makroexemplet nedan. Även om det finns ett mycket enklare sätt att få dokumentegenskapen "paragraph count" visar exemplet den grundläggande sekventiella metoden för att komma åt varje stycke i ett textdokument.
Sub ParaCount
'
' Räkna antalet stycken i textdokumentet
'
Dim Doc As Object , Enum As Object , TextEl As Object , Count As Long
Doc = ThisComponent
' Är detta ett textdokument?
Om inte Doc . SupportsService ( "com.sun.star.text.TextDocument" ) Sedan
MsgBox "Detta makro måste köras från ett textdokument" , 64 , "Error"
Avsluta Sub
End If
Count = 0
' Kontrollera varje komponent: stycke eller tabell?
Enum = Dok . text . Skapa Uppräkning
medan Enum . HasMoreElementsTextEl
= Enum . _ NextElement ' Är komponenten ett stycke? Om TextEl . SupportsService ( "com.sun.star.text.Paragraph" ) Sedan Räkna = Räkna + 1 Slut Om Vend 'Visa resultat MsgBox Antal , 0 , "Paragraph Count " End Sub
Se även
Länkar
GRUNDLÄGGANDE makron
OpenOffice.org API
| libreoffice |
|---|
| Ansökningar | | |
|---|
| Teknologi |
|
|---|
| Organisationer |
|
|---|
- Kategori
- Wikimedia Commons
- wikibok
|
| Dialekter av programmeringsspråket BASIC |
|---|
| Klassisk |
|
|---|
| övergångsperiod |
|
|---|
| processuella |
|
|---|
| Objekt |
|
|---|
| Mobil |
|
|---|
| Trösta |
|
|---|