Quelle  Test.xba   Sprache: unbekannt

<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE script:module PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "module.dtd">
<script:module xmlns:script="http://openoffice.org/2000/script" script:name="Test" script:language="StarBasic">Option Explicit
'Option Compatible

Sub Main
Dim a, b()
 _ErrorHandler(False)
' DebugPrint vbLF
' TraceConsole()
 exit sub
End Sub

</script:module>