OpenOfficeBasic es un lenguaje de programación de alto nivel similar a Microsoft VisualBasic for Applications (VBA) pero basado en OpenOffice Basic.
Se accede a OpenOfficeBasic desde alguns aplicaciones de OpenOffice o LibreOffice como: Writer, Calc y Base.
Es utilizado para escribir pequeños programas conocidos como "macros", que sirven por ejemplo para contar palabras en diversos párrafos de un texto .
Es similar a como se programa y opera con las "Macros" de Microsoft VisualBasic
Está escrito en funciones de llamada o subrutinas macros, y en cada macro el desempeño es una tarea diferente, como por ejemplo: contar las palabras de un párrafo.
Es especialmente útil para hacer las tareas repetitivas que no se han integrado en el programa. (es decir, agregarle caraterísticas a la aplicación de LibreOffice)
Como la base de datos de Apache OpenOffice (Base), utiliza los documentos creados en virtud de la aplicación de Writer para informes y formas, se podría decir que OpenOffice Base también puede ser programado con OpenOfficeBasic.
Desarrolladores: Sun Microsystems
Última versión: 3.0.0 (2008)
Sistema operativo: Multiplataforma
Licencia: GNU Lesser General Public License
OpenOfficeBasic puede ser dividido en 4 componentes:
El lenguaje Basic define las construcciones lingüísticas elementales, como las declaraciones de variables, los bucles y las funciones.
La biblioteca de tiempo de ejecución (runtime library): proporciona funciones estándar que no tienen ninguna referencia directa a OpenOffice, como: funciones para edición de números, cadenas de caracteres, fechas y archivos.
El API de OpenOffice (Application Programming Interface): permite el acceso a documentos de OpenOffice y que sean creados, guardados, modificados e impresos.
El editor de diálogo: crea ventanas de diálogo y ofrece la posibilidad de agregar elementos de control y manipulación de evento.
Ejemplo:
REM *BASIC de Open Office*
' una Macro escrita en Basic
sub sub_saludo
v_nombre = inputBox("Dime tu nombre")
msgbox "Hola " + v_nombre
end sub
Sub Main
sub_saludo
End Sub
Otro ejemplo:
Sub ParaCount
' Count number of paragraphs in a text document
Dim Doc As Object, Enum As Object, TextEl 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
--------
Links:
Ayuda de LibreOffice: https://help.libreoffice.org/7.5/es/text/sbasic/shared/main0601.html?&DbPAR=SHARED&System=WIN
Guía de Apache OpenOfficeBASIC: https://wiki.openoffice.org/wiki/Documentation/BASIC_Guide
Aprender macros:
Aprender frameworks y kit de desarrollo: