wizards/source/access2base/Test.xba

   1 <?xml version="1.0" encoding="UTF-8"?>
   2 <!DOCTYPE script:module PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "module.dtd">
   3 <script:module xmlns:script="http://openoffice.org/2000/script" script:name="Test" script:language="StarBasic">Option Explicit
   4 &apos;Option Compatible
   5
   6 Sub Main
   7 Dim a, b()
   8         _ErrorHandler(False)
   9 &apos;  DebugPrint vbLF
  10 &apos;  TraceConsole()
  11         exit sub
  12 End Sub
  13
  14 </script:module>