14 lines
No EOL
406 B
XML
14 lines
No EOL
406 B
XML
<?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> |