KXStudio Website https://kx.studio/
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

vb.php 5.0KB

11 years ago
11 years ago
123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157
  1. <?php
  2. /*************************************************************************************
  3. * vb.php
  4. * ------
  5. * Author: Roberto Rossi (rsoftware@altervista.org)
  6. * Copyright: (c) 2004 Roberto Rossi (http://rsoftware.altervista.org),
  7. * Nigel McNie (http://qbnz.com/highlighter)
  8. * Release Version: 1.0.8.11
  9. * Date Started: 2004/08/30
  10. *
  11. * Visual Basic language file for GeSHi.
  12. *
  13. * CHANGES
  14. * -------
  15. * 2008/08/27 (1.0.8.1)
  16. * - changed keyword list for better Visual Studio compliance
  17. * 2008/08/26 (1.0.8.1)
  18. * - Fixed multiline comments
  19. * 2004/11/27 (1.0.1)
  20. * - Added support for multiple object splitters
  21. * 2004/08/30 (1.0.0)
  22. * - First Release
  23. *
  24. * TODO (updated 2004/11/27)
  25. * -------------------------
  26. *
  27. *************************************************************************************
  28. *
  29. * This file is part of GeSHi.
  30. *
  31. * GeSHi is free software; you can redistribute it and/or modify
  32. * it under the terms of the GNU General Public License as published by
  33. * the Free Software Foundation; either version 2 of the License, or
  34. * (at your option) any later version.
  35. *
  36. * GeSHi is distributed in the hope that it will be useful,
  37. * but WITHOUT ANY WARRANTY; without even the implied warranty of
  38. * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  39. * GNU General Public License for more details.
  40. *
  41. * You should have received a copy of the GNU General Public License
  42. * along with GeSHi; if not, write to the Free Software
  43. * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
  44. *
  45. ************************************************************************************/
  46. $language_data = array (
  47. 'LANG_NAME' => 'Visual Basic',
  48. 'COMMENT_SINGLE' => array(),
  49. 'COMMENT_MULTI' => array(),
  50. 'COMMENT_REGEXP' => array(
  51. // Comments (either single or multiline with _
  52. 1 => '/\'.*(?<! _)\n/sU',
  53. ),
  54. 'CASE_KEYWORDS' => GESHI_CAPS_NO_CHANGE,
  55. 'QUOTEMARKS' => array('"'),
  56. 'ESCAPE_CHAR' => '',
  57. 'KEYWORDS' => array(
  58. 1 => array(
  59. 'Binary', 'Boolean', 'Byte', 'Currency', 'Date', 'Decimal', 'Double',
  60. 'String', 'Enum', 'Integer', 'Long', 'Object', 'Single', 'Variant'
  61. ),
  62. 2 => array(
  63. 'CreateObject', 'GetObject', 'New', 'Option', 'Function',
  64. 'Call', 'Private', 'Public', 'Sub', 'Explicit', 'Compare', 'Exit'
  65. ),
  66. 3 => array(
  67. 'And', 'Case', 'Do', 'Each', 'Else', 'ElseIf', 'For',
  68. 'Goto', 'If', 'Is', 'Loop', 'Next', 'Not', 'Or', 'Select', 'Step',
  69. 'Then', 'To', 'Until', 'While', 'With', 'Xor', 'WithEvents',
  70. 'DoEvents', 'Close', 'Like', 'In', 'End'
  71. ),
  72. 4 => array(
  73. 'As', 'Dim', 'Get', 'Set', 'ReDim', 'Error',
  74. 'Resume', 'Declare', 'Let', 'ByRef', 'ByVal',
  75. 'Optional', 'Property', 'Control', 'UBound', 'Mod',
  76. 'GoSub', 'Implements', 'Input', 'LBound', 'Static', 'Stop',
  77. 'Type', 'TypeOf', 'On', 'Open', 'Output', 'ParamArray',
  78. 'Preserve', 'Print', 'RaiseEvent', 'Random', 'Line'
  79. ),
  80. 5 => array(
  81. 'Nothing', 'False', 'True', 'Null', 'Empty'
  82. ),
  83. 6 => array(
  84. 'ErrorHandler','ExitProc', 'PublishReport'
  85. ),
  86. ),
  87. 'SYMBOLS' => array(
  88. ),
  89. 'CASE_SENSITIVE' => array(
  90. GESHI_COMMENTS => false,
  91. 1 => false,
  92. 2 => false,
  93. 3 => false,
  94. 4 => false,
  95. 5 => false,
  96. 6 => false
  97. ),
  98. 'STYLES' => array(
  99. 'KEYWORDS' => array(
  100. 1 => 'color: #F660AB; font-weight: bold;',
  101. 2 => 'color: #E56717; font-weight: bold;',
  102. 3 => 'color: #8D38C9; font-weight: bold;',
  103. 4 => 'color: #151B8D; font-weight: bold;',
  104. 5 => 'color: #00C2FF; font-weight: bold;',
  105. 6 => 'color: #3EA99F; font-weight: bold;'
  106. ),
  107. 'COMMENTS' => array(
  108. 1 => 'color: #008000;'
  109. ),
  110. 'BRACKETS' => array(
  111. ),
  112. 'STRINGS' => array(
  113. 0 => 'color: #800000;'
  114. ),
  115. 'NUMBERS' => array(
  116. ),
  117. 'METHODS' => array(
  118. ),
  119. 'SYMBOLS' => array(
  120. ),
  121. 'ESCAPE_CHAR' => array(
  122. 0 => 'color: #800000; font-weight: bold;'
  123. ),
  124. 'SCRIPT' => array(
  125. ),
  126. 'REGEXPS' => array(
  127. )
  128. ),
  129. 'URLS' => array(
  130. 1 => '',
  131. 2 => '',
  132. 3 => '',
  133. 4 => '',
  134. 5 => '',
  135. 6 => ''
  136. ),
  137. 'OOLANG' => false,
  138. 'OBJECT_SPLITTERS' => array(
  139. ),
  140. 'REGEXPS' => array(
  141. ),
  142. 'STRICT_MODE_APPLIES' => GESHI_NEVER,
  143. 'SCRIPT_DELIMITERS' => array(
  144. ),
  145. 'HIGHLIGHT_STRICT_BLOCK' => array(
  146. ),
  147. 'PARSER_CONTROL' => array(
  148. 'ENABLE_FLAGS' => array(
  149. 'BRACKETS' => GESHI_NEVER,
  150. 'SYMBOLS' => GESHI_NEVER,
  151. 'NUMBERS' => GESHI_NEVER
  152. )
  153. )
  154. );
  155. ?>