[Sommaire] [Imprimer]

   1  <?php
   2  /*************************************************************************************
   3   * vb.php
   4   * ------
   5   * Author: Roberto Rossi (rsoftware@altervista.org)
   6   * Copyright: (c) 2004 Roberto Rossi (http://rsoftware.altervista.org), Nigel McNie (http://qbnz.com/highlighter)
   7   * Release Version: 1.0.7.15
   8   * CVS Revision Version: $Revision: 1.14.2.4 $
   9   * Date Started: 2004/08/30
  10   * Last Modified: $Date: 2006/09/23 02:05:48 $
  11   *
  12   * Visual Basic language file for GeSHi.
  13   *
  14   * CHANGES
  15   * -------
  16   * 2004/11/27 (1.0.1)
  17   *  -  Added support for multiple object splitters
  18   * 2004/08/30 (1.0.0)
  19   *  -  First Release
  20   *
  21   * TODO (updated 2004/11/27)
  22   * -------------------------
  23   *
  24   *************************************************************************************
  25   *
  26   *     This file is part of GeSHi.
  27   *
  28   *   GeSHi is free software; you can redistribute it and/or modify
  29   *   it under the terms of the GNU General Public License as published by
  30   *   the Free Software Foundation; either version 2 of the License, or
  31   *   (at your option) any later version.
  32   *
  33   *   GeSHi is distributed in the hope that it will be useful,
  34   *   but WITHOUT ANY WARRANTY; without even the implied warranty of
  35   *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  36   *   GNU General Public License for more details.
  37   *
  38   *   You should have received a copy of the GNU General Public License
  39   *   along with GeSHi; if not, write to the Free Software
  40   *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  41   *
  42   ************************************************************************************/
  43   $language_data = array (
  44      'LANG_NAME' => 'Visual Basic',
  45      'COMMENT_SINGLE' => array(1 => "'"),
  46      'COMMENT_MULTI' => array(),
  47      'CASE_KEYWORDS' => GESHI_CAPS_NO_CHANGE,
  48      'QUOTEMARKS' => array('"'),
  49      'ESCAPE_CHAR' => '',
  50      'KEYWORDS' => array(
  51          1 => array(
  52              'as', 'err', 'boolean', 'and', 'or', 'recordset', 'unload', 'to',
  53              'integer','long','single','new','database','nothing','set','close',
  54              'open','print','split','line','field','querydef','instrrev',
  55              'abs','array','asc','ascb','ascw','atn','avg','me',
  56              'cbool','cbyte','ccur','cdate','cdbl','cdec','choose','chr','chrb','chrw','cint','clng',
  57              'command','cos','count','createobject','csng','cstr','curdir','cvar','cvdate','cverr',
  58              'date','dateadd','datediff','datepart','dateserial','datevalue','day','ddb','dir','doevents',
  59              'environ','eof','error','exp',
  60              'fileattr','filedatetime','filelen','fix','format','freefile','fv',
  61              'getallstrings','getattr','getautoserversettings','getobject','getsetting',
  62              'hex','hour','iif','imestatus','input','inputb','inputbox','instr','instb','int','ipmt',
  63              'isarray','isdate','isempty','iserror','ismissing','isnull','isnumeric','isobject',
  64              'lbound','lcase','left','leftb','len','lenb','loadpicture','loc','lof','log','ltrim',
  65              'max','mid','midb','min','minute','mirr','month','msgbox',
  66              'now','nper','npv','oct','partition','pmt','ppmt','pv','qbcolor',
  67              'rate','rgb','right','rightb','rnd','rtrim',
  68              'second','seek','sgn','shell','sin','sln','space','spc','sqr','stdev','stdevp','str',
  69              'strcomp','strconv','string','switch','sum','syd',
  70              'tab','tan','time','timer','timeserial','timevalue','trim','typename',
  71              'ubound','ucase','val','var','varp','vartype','weekday','year',
  72              'appactivate','base','beep','call','case','chdir','chdrive','const',
  73              'declare','defbool','defbyte','defcur','defdate','defdbl','defdec','defint',
  74              'deflng','defobj','defsng','defstr','deftype','defvar','deletesetting','dim','do',
  75              'else','elseif','end','enum','erase','event','exit','explicit',
  76              'false','filecopy','for','foreach','friend','function','get','gosub','goto',
  77              'if','implements','kill','let','lineinput','lock','loop','lset','mkdir','name','next','not',
  78              'onerror','on','option','private','property','public','put','raiseevent','randomize',
  79              'redim','rem','reset','resume','return','rmdir','rset',
  80              'savepicture','savesetting','sendkeys','setattr','static','sub',
  81              'then','true','type','unlock','wend','while','width','with','write',
  82              'vbabort','vbabortretryignore','vbapplicationmodal','vbarray',
  83              'vbbinarycompare','vbblack','vbblue','vbboolean','vbbyte','vbcancel',
  84              'vbcr','vbcritical','vbcrlf','vbcurrency','vbcyan','vbdataobject',
  85              'vbdate','vbdecimal','vbdefaultbutton1','vbdefaultbutton2',
  86              'vbdefaultbutton3','vbdefaultbutton4','vbdouble','vbempty',
  87              'vberror','vbexclamation','vbfirstfourdays','vbfirstfullweek',
  88              'vbfirstjan1','vbformfeed','vbfriday','vbgeneraldate','vbgreen',
  89              'vbignore','vbinformation','vbinteger','vblf','vblong','vblongdate',
  90              'vblongtime','vbmagenta','vbmonday','vbnewline','vbno','vbnull',
  91              'vbnullchar','vbnullstring','vbobject','vbobjecterror','vbok','vbokcancel',
  92              'vbokonly','vbquestion','vbred','vbretry','vbretrycancel','vbsaturday',
  93              'vbshortdate','vbshorttime','vbsingle','vbstring','vbsunday',
  94              'vbsystemmodal','vbtab','vbtextcompare','vbthursday','vbtuesday',
  95              'vbusesystem','vbusesystemdayofweek','vbvariant','vbverticaltab',
  96              'vbwednesday','vbwhite','vbyellow','vbyes','vbyesno','vbyesnocancel',
  97              'vbnormal','vbdirectory'
  98              )
  99          ),
 100      'SYMBOLS' => array(
 101          '(', ')'
 102          ),
 103      'CASE_SENSITIVE' => array(
 104          GESHI_COMMENTS => false,
 105          1 => false
 106          ),
 107      'STYLES' => array(
 108          'KEYWORDS' => array(
 109              1 => 'color: #b1b100;'
 110              ),
 111          'COMMENTS' => array(
 112              1 => 'color: #808080;'
 113              ),
 114          'BRACKETS' => array(
 115              0 => 'color: #66cc66;'
 116              ),
 117          'STRINGS' => array(
 118              0 => 'color: #ff0000;'
 119              ),
 120          'NUMBERS' => array(
 121              0 => 'color: #cc66cc;'
 122              ),
 123          'METHODS' => array(
 124              1 => 'color: #66cc66;'
 125              ),
 126          'SYMBOLS' => array(
 127              0 => 'color: #66cc66;'
 128              ),
 129          'ESCAPE_CHAR' => array(
 130              0 => 'color: #000099;'
 131              ),
 132          'SCRIPT' => array(
 133              ),
 134          'REGEXPS' => array(
 135              )
 136          ),
 137      'OOLANG' => true,
 138      'OBJECT_SPLITTERS' => array(
 139          1 => '.'
 140          ),
 141      'REGEXPS' => array(
 142          ),
 143      'STRICT_MODE_APPLIES' => GESHI_NEVER,
 144      'SCRIPT_DELIMITERS' => array(
 145          ),
 146      'HIGHLIGHT_STRICT_BLOCK' => array(
 147          )
 148  );
 149  
 150  ?>