File: Test.xba

package info (click to toggle)
libreoffice 4%3A25.8.1-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 3,814,648 kB
  • sloc: cpp: 4,377,924; xml: 454,658; java: 257,215; python: 80,826; ansic: 33,824; perl: 30,304; javascript: 19,722; sh: 11,717; makefile: 10,622; cs: 8,865; yacc: 8,549; objc: 2,131; lex: 1,379; asm: 1,231; awk: 996; pascal: 914; csh: 20; sed: 5
file content (14 lines) | stat: -rw-r--r-- 406 bytes parent folder | download | duplicates (9) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
<?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
&apos;Option Compatible

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

</script:module>