neovim

Neovim text editor
git clone https://git.dasho.dev/neovim.git
Log | Files | Refs | README

vb.vim (21122B)


      1 " Vim syntax file
      2 " Language:     Visual Basic
      3 " Maintainer:   Doug Kearns <dougkearns@gmail.com>
      4 " Former Maintainer:    Tim Chase <vb.vim@tim.thechases.com>
      5 " Former Maintainer:    Robert M. Cortopassi <cortopar@mindspring.com>
      6 "       (tried multiple times to contact, but email bounced)
      7 " Last Change:
      8 "   2021 Nov 26  Incorporated additions from Doug Kearns
      9 "   2005 May 25  Synched with work by Thomas Barthel
     10 "   2004 May 30  Added a few keywords
     11 
     12 " This was thrown together after seeing numerous requests on the
     13 " VIM and VIM-DEV mailing lists.  It is by no means complete.
     14 " Send comments, suggestions and requests to the maintainer.
     15 
     16 " quit when a syntax file was already loaded
     17 if exists("b:current_syntax")
     18        finish
     19 endif
     20 
     21 " VB is case insensitive
     22 syn case ignore
     23 
     24 syn keyword vbConditional If Then ElseIf Else Select Case
     25 
     26 syn keyword vbOperator AddressOf And ByRef ByVal Eqv Imp In
     27 syn keyword vbOperator Is Like Mod Not Or To Xor
     28 
     29 syn match vbOperator "[()+.,\-/*=&]"
     30 syn match vbOperator "[<>]=\="
     31 syn match vbOperator "<>"
     32 syn match vbOperator "\s\+_$"
     33 
     34 syn keyword vbBoolean  True False
     35 syn keyword vbConst Null Nothing
     36 
     37 syn keyword vbRepeat Do For ForEach Loop Next
     38 syn keyword vbRepeat Step To Until Wend While
     39 
     40 syn keyword vbEvents AccessKeyPress Activate ActiveRowChanged
     41 syn keyword vbEvents AfterAddFile AfterChangeFileName AfterCloseFile
     42 syn keyword vbEvents AfterColEdit AfterColUpdate AfterDelete
     43 syn keyword vbEvents AfterInsert AfterLabelEdit AfterRemoveFile
     44 syn keyword vbEvents AfterUpdate AfterWriteFile AmbientChanged
     45 syn keyword vbEvents ApplyChanges Associate AsyncProgress
     46 syn keyword vbEvents AsyncReadComplete AsyncReadProgress AxisActivated
     47 syn keyword vbEvents AxisLabelActivated AxisLabelSelected
     48 syn keyword vbEvents AxisLabelUpdated AxisSelected AxisTitleActivated
     49 syn keyword vbEvents AxisTitleSelected AxisTitleUpdated AxisUpdated
     50 syn keyword vbEvents BeforeClick BeforeColEdit BeforeColUpdate
     51 syn keyword vbEvents BeforeConnect BeforeDelete BeforeInsert
     52 syn keyword vbEvents BeforeLabelEdit BeforeLoadFile BeforeUpdate
     53 syn keyword vbEvents BeginRequest BeginTrans ButtonClick
     54 syn keyword vbEvents ButtonCompleted ButtonDropDown ButtonGotFocus
     55 syn keyword vbEvents ButtonLostFocus CallbackKeyDown Change Changed
     56 syn keyword vbEvents ChartActivated ChartSelected ChartUpdated Click
     57 syn keyword vbEvents Close CloseQuery CloseUp ColEdit ColResize
     58 syn keyword vbEvents Collapse ColumnClick CommitTrans Compare
     59 syn keyword vbEvents ConfigChageCancelled ConfigChanged
     60 syn keyword vbEvents ConfigChangedCancelled Connect ConnectionRequest
     61 syn keyword vbEvents CurrentRecordChanged DECommandAdded
     62 syn keyword vbEvents DECommandPropertyChanged DECommandRemoved
     63 syn keyword vbEvents DEConnectionAdded DEConnectionPropertyChanged
     64 syn keyword vbEvents DEConnectionRemoved DataArrival DataChanged
     65 syn keyword vbEvents DataUpdated DateClicked DblClick Deactivate
     66 syn keyword vbEvents DevModeChange DeviceArrival DeviceOtherEvent
     67 syn keyword vbEvents DeviceQueryRemove DeviceQueryRemoveFailed
     68 syn keyword vbEvents DeviceRemoveComplete DeviceRemovePending
     69 syn keyword vbEvents Disconnect DisplayChanged Dissociate
     70 syn keyword vbEvents DoGetNewFileName Done DonePainting DownClick
     71 syn keyword vbEvents DragDrop DragOver DropDown EditProperty EditQuery
     72 syn keyword vbEvents EndRequest EnterCell EnterFocus ExitFocus Expand
     73 syn keyword vbEvents FontChanged FootnoteActivated FootnoteSelected
     74 syn keyword vbEvents FootnoteUpdated Format FormatSize GotFocus
     75 syn keyword vbEvents HeadClick HeightChanged Hide InfoMessage
     76 syn keyword vbEvents IniProperties InitProperties Initialize
     77 syn keyword vbEvents ItemActivated ItemAdded ItemCheck ItemClick
     78 syn keyword vbEvents ItemReloaded ItemRemoved ItemRenamed
     79 syn keyword vbEvents ItemSeletected KeyDown KeyPress KeyUp LeaveCell
     80 syn keyword vbEvents LegendActivated LegendSelected LegendUpdated
     81 syn keyword vbEvents LinkClose LinkError LinkExecute LinkNotify
     82 syn keyword vbEvents LinkOpen Load LostFocus MouseDown MouseMove
     83 syn keyword vbEvents MouseUp NodeCheck NodeClick OLECompleteDrag
     84 syn keyword vbEvents OLEDragDrop OLEDragOver OLEGiveFeedback OLESetData
     85 syn keyword vbEvents OLEStartDrag ObjectEvent ObjectMove OnAddNew
     86 syn keyword vbEvents OnComm Paint PanelClick PanelDblClick PathChange
     87 syn keyword vbEvents PatternChange PlotActivated PlotSelected
     88 syn keyword vbEvents PlotUpdated PointActivated PointLabelActivated
     89 syn keyword vbEvents PointLabelSelected PointLabelUpdated PointSelected
     90 syn keyword vbEvents PointUpdated PowerQuerySuspend PowerResume
     91 syn keyword vbEvents PowerStatusChanged PowerSuspend ProcessTag
     92 syn keyword vbEvents ProcessingTimeout QueryChangeConfig QueryClose
     93 syn keyword vbEvents QueryComplete QueryCompleted QueryTimeout
     94 syn keyword vbEvents QueryUnload ReadProperties RepeatedControlLoaded
     95 syn keyword vbEvents RepeatedControlUnloaded Reposition
     96 syn keyword vbEvents RequestChangeFileName RequestWriteFile Resize
     97 syn keyword vbEvents ResultsChanged RetainedProject RollbackTrans
     98 syn keyword vbEvents RowColChange RowCurrencyChange RowResize
     99 syn keyword vbEvents RowStatusChanged Scroll SelChange SelectionChanged
    100 syn keyword vbEvents SendComplete SendProgress SeriesActivated
    101 syn keyword vbEvents SeriesSelected SeriesUpdated SettingChanged Show
    102 syn keyword vbEvents SplitChange Start StateChanged StatusUpdate
    103 syn keyword vbEvents SysColorsChanged Terminate TimeChanged Timer
    104 syn keyword vbEvents TitleActivated TitleSelected TitleUpdated
    105 syn keyword vbEvents UnboundAddData UnboundDeleteRow
    106 syn keyword vbEvents UnboundGetRelativeBookmark UnboundReadData
    107 syn keyword vbEvents UnboundWriteData Unformat Unload UpClick Updated
    108 syn keyword vbEvents UserEvent Validate ValidationError
    109 syn keyword vbEvents VisibleRecordChanged WillAssociate WillChangeData
    110 syn keyword vbEvents WillDissociate WillExecute WillUpdateRows
    111 syn keyword vbEvents WriteProperties
    112 
    113 
    114 syn keyword vbFunction Abs Array Asc AscB AscW Atn Avg BOF CBool CByte
    115 syn keyword vbFunction CCur CDate CDbl CInt CLng CSng CStr CVDate CVErr
    116 syn keyword vbFunction CVar CallByName Cdec Choose Chr ChrB ChrW Command
    117 syn keyword vbFunction Cos Count CreateObject CurDir DDB Date DateAdd
    118 syn keyword vbFunction DateDiff DatePart DateSerial DateValue Day Dir
    119 syn keyword vbFunction DoEvents EOF Environ Error Exp FV FileAttr
    120 syn keyword vbFunction FileDateTime FileLen FilterFix Fix Format
    121 syn keyword vbFunction FormatCurrency FormatDateTime FormatNumber
    122 syn keyword vbFunction FormatPercent FreeFile GetAllStrings GetAttr
    123 syn keyword vbFunction GetAutoServerSettings GetObject GetSetting Hex
    124 syn keyword vbFunction Hour IIf IMEStatus IPmt InStr Input InputB
    125 syn keyword vbFunction InputBox InstrB Int IsArray IsDate IsEmpty IsError
    126 syn keyword vbFunction IsMissing IsNull IsNumeric IsObject Join LBound
    127 syn keyword vbFunction LCase LOF LTrim Left LeftB Len LenB LoadPicture
    128 syn keyword vbFunction LoadResData LoadResPicture LoadResString Loc Log
    129 syn keyword vbFunction MIRR Max Mid MidB Min Minute Month MonthName
    130 syn keyword vbFunction MsgBox NPV NPer Now Oct PPmt PV Partition Pmt
    131 syn keyword vbFunction QBColor RGB RTrim Rate Replace Right RightB Rnd
    132 syn keyword vbFunction Round SLN SYD Second Seek Sgn Shell Sin Space Spc
    133 syn keyword vbFunction Split Sqr StDev StDevP Str StrComp StrConv
    134 syn keyword vbFunction StrReverse String Sum Switch Tab Tan Time
    135 syn keyword vbFunction TimeSerial TimeValue Timer Trim TypeName UBound
    136 syn keyword vbFunction UCase Val Var VarP VarType Weekday WeekdayName
    137 syn keyword vbFunction Year
    138 
    139 syn keyword vbMethods AboutBox Accept Activate Add AddCustom AddFile
    140 syn keyword vbMethods AddFromFile AddFromGuid AddFromString
    141 syn keyword vbMethods AddFromTemplate AddItem AddNew AddToAddInToolbar
    142 syn keyword vbMethods AddToolboxProgID Append AppendAppendChunk
    143 syn keyword vbMethods AppendChunk Arrange Assert AsyncRead BatchUpdate
    144 syn keyword vbMethods BeginQueryEdit BeginTrans Bind BuildPath
    145 syn keyword vbMethods CanPropertyChange Cancel CancelAsyncRead
    146 syn keyword vbMethods CancelBatch CancelUpdate CaptureImage CellText
    147 syn keyword vbMethods CellValue Circle Clear ClearFields ClearSel
    148 syn keyword vbMethods ClearSelCols ClearStructure Clone Close Cls
    149 syn keyword vbMethods ColContaining CollapseAll ColumnSize CommitTrans
    150 syn keyword vbMethods CompactDatabase Compose Connect Copy CopyFile
    151 syn keyword vbMethods CopyFolder CopyQueryDef Count CreateDatabase
    152 syn keyword vbMethods CreateDragImage CreateEmbed CreateField
    153 syn keyword vbMethods CreateFolder CreateGroup CreateIndex CreateLink
    154 syn keyword vbMethods CreatePreparedStatement CreatePropery CreateQuery
    155 syn keyword vbMethods CreateQueryDef CreateRelation CreateTableDef
    156 syn keyword vbMethods CreateTextFile CreateToolWindow CreateUser
    157 syn keyword vbMethods CreateWorkspace Customize Cut Delete
    158 syn keyword vbMethods DeleteColumnLabels DeleteColumns DeleteFile
    159 syn keyword vbMethods DeleteFolder DeleteLines DeleteRowLabels
    160 syn keyword vbMethods DeleteRows DeselectAll DesignerWindow DoVerb Drag
    161 syn keyword vbMethods Draw DriveExists Edit EditCopy EditPaste EndDoc
    162 syn keyword vbMethods EnsureVisible EstablishConnection Execute Exists
    163 syn keyword vbMethods Expand Export ExportReport ExtractIcon Fetch
    164 syn keyword vbMethods FetchVerbs FileExists Files FillCache Find
    165 syn keyword vbMethods FindFirst FindItem FindLast FindNext FindPrevious
    166 syn keyword vbMethods FolderExists Forward GetAbsolutePathName
    167 syn keyword vbMethods GetBaseName GetBookmark GetChunk GetClipString
    168 syn keyword vbMethods GetData GetDrive GetDriveName GetFile GetFileName
    169 syn keyword vbMethods GetFirstVisible GetFolder GetFormat GetHeader
    170 syn keyword vbMethods GetLineFromChar GetNumTicks GetParentFolderName
    171 syn keyword vbMethods GetRows GetSelectedPart GetSelection
    172 syn keyword vbMethods GetSpecialFolder GetTempName GetText
    173 syn keyword vbMethods GetVisibleCount GoBack GoForward Hide HitTest
    174 syn keyword vbMethods HoldFields Idle Import InitializeLabels Insert
    175 syn keyword vbMethods InsertColumnLabels InsertColumns InsertFile
    176 syn keyword vbMethods InsertLines InsertObjDlg InsertRowLabels
    177 syn keyword vbMethods InsertRows Item Keys KillDoc Layout Line Lines
    178 syn keyword vbMethods LinkExecute LinkPoke LinkRequest LinkSend Listen
    179 syn keyword vbMethods LoadFile LoadResData LoadResPicture LoadResString
    180 syn keyword vbMethods LogEvent MakeCompileFile MakeCompiledFile
    181 syn keyword vbMethods MakeReplica MoreResults Move MoveData MoveFile
    182 syn keyword vbMethods MoveFirst MoveFolder MoveLast MoveNext
    183 syn keyword vbMethods MovePrevious NavigateTo NewPage NewPassword
    184 syn keyword vbMethods NextRecordset OLEDrag OnAddinsUpdate OnConnection
    185 syn keyword vbMethods OnDisconnection OnStartupComplete Open
    186 syn keyword vbMethods OpenAsTextStream OpenConnection OpenDatabase
    187 syn keyword vbMethods OpenQueryDef OpenRecordset OpenResultset OpenURL
    188 syn keyword vbMethods Overlay PSet PaintPicture PastSpecialDlg Paste
    189 syn keyword vbMethods PeekData Play Point PopulatePartial PopupMenu
    190 syn keyword vbMethods Print PrintForm PrintReport PropertyChanged Quit
    191 syn keyword vbMethods Raise RandomDataFill RandomFillColumns
    192 syn keyword vbMethods RandomFillRows ReFill Read ReadAll ReadFromFile
    193 syn keyword vbMethods ReadLine ReadProperty Rebind Refresh RefreshLink
    194 syn keyword vbMethods RegisterDatabase ReleaseInstance Reload Remove
    195 syn keyword vbMethods RemoveAddInFromToolbar RemoveAll RemoveItem Render
    196 syn keyword vbMethods RepairDatabase ReplaceLine Reply ReplyAll Requery
    197 syn keyword vbMethods ResetCustom ResetCustomLabel ResolveName
    198 syn keyword vbMethods RestoreToolbar Resync Rollback RollbackTrans
    199 syn keyword vbMethods RowBookmark RowContaining RowTop Save SaveAs
    200 syn keyword vbMethods SaveFile SaveToFile SaveToOle1File SaveToolbar
    201 syn keyword vbMethods Scale ScaleX ScaleY Scroll SelPrint SelectAll
    202 syn keyword vbMethods SelectPart Send SendData Set SetAutoServerSettings
    203 syn keyword vbMethods SetData SetFocus SetOption SetSelection SetSize
    204 syn keyword vbMethods SetText SetViewport Show ShowColor ShowFont
    205 syn keyword vbMethods ShowHelp ShowOpen ShowPrinter ShowSave
    206 syn keyword vbMethods ShowWhatsThis SignOff SignOn Size Skip SkipLine
    207 syn keyword vbMethods Span Split SplitContaining StartLabelEdit
    208 syn keyword vbMethods StartLogging Stop Synchronize Tag TextHeight
    209 syn keyword vbMethods TextWidth ToDefaults Trace TwipsToChartPart
    210 syn keyword vbMethods TypeByChartType URLFor Update UpdateControls
    211 syn keyword vbMethods UpdateRecord UpdateRow Upto ValidateControls Value
    212 syn keyword vbMethods WhatsThisMode Write WriteBlankLines WriteLine
    213 syn keyword vbMethods WriteProperty WriteTemplate ZOrder
    214 syn keyword vbMethods rdoCreateEnvironment rdoRegisterDataSource
    215 
    216 syn keyword vbStatement Alias AppActivate As Base Beep Begin Call ChDir
    217 syn keyword vbStatement ChDrive Close Const Date Declare DefBool DefByte
    218 syn keyword vbStatement DefCur DefDate DefDbl DefDec DefInt DefLng DefObj
    219 syn keyword vbStatement DefSng DefStr DefVar Deftype DeleteSetting Dim Do
    220 syn keyword vbStatement Each ElseIf End Enum Erase Error Event Exit
    221 syn keyword vbStatement Explicit FileCopy For ForEach Function Get GoSub
    222 syn keyword vbStatement GoTo Gosub Implements Kill LSet Let Lib LineInput
    223 syn keyword vbStatement Load Lock Loop Mid MkDir Name Next On OnError Open
    224 syn keyword vbStatement Option Preserve Private Property Public Put RSet
    225 syn keyword vbStatement RaiseEvent Randomize ReDim Redim Reset Resume
    226 syn keyword vbStatement Return RmDir SavePicture SaveSetting Seek SendKeys
    227 syn keyword vbStatement Sendkeys Set SetAttr Static Step Stop Sub Time
    228 syn keyword vbStatement Type Unload Unlock Until Wend While Width With
    229 syn keyword vbStatement Write
    230 
    231 syn keyword vbKeyword As Binary ByRef ByVal Date Empty Error Friend Get
    232 syn keyword vbKeyword Input Is Len Lock Me Mid New Nothing Null On
    233 syn keyword vbKeyword Option Optional ParamArray Print Private Property
    234 syn keyword vbKeyword Public PublicNotCreateable OnNewProcessSingleUse
    235 syn keyword vbKeyword InSameProcessMultiUse GlobalMultiUse Resume Seek
    236 syn keyword vbKeyword Set Static Step String Time WithEvents
    237 
    238 syn keyword vbTodo contained    TODO
    239 
    240 "Datatypes
    241 syn keyword vbTypes Boolean Byte Currency Date Decimal Double Empty
    242 syn keyword vbTypes Integer Long Object Single String Variant
    243 
    244 "VB defined values
    245 syn keyword vbDefine dbBigInt dbBinary dbBoolean dbByte dbChar
    246 syn keyword vbDefine dbCurrency dbDate dbDecimal dbDouble dbFloat
    247 syn keyword vbDefine dbGUID dbInteger dbLong dbLongBinary dbMemo
    248 syn keyword vbDefine dbNumeric dbSingle dbText dbTime dbTimeStamp
    249 syn keyword vbDefine dbVarBinary
    250 
    251 "VB defined values
    252 syn keyword vbDefine vb3DDKShadow vb3DFace vb3DHighlight vb3DLight
    253 syn keyword vbDefine vb3DShadow vbAbort vbAbortRetryIgnore
    254 syn keyword vbDefine vbActiveBorder vbActiveTitleBar vbAlias
    255 syn keyword vbDefine vbApplicationModal vbApplicationWorkspace
    256 syn keyword vbDefine vbAppTaskManager vbAppWindows vbArchive vbArray
    257 syn keyword vbDefine vbBack vbBinaryCompare vbBlack vbBlue vbBoolean
    258 syn keyword vbDefine vbButtonFace vbButtonShadow vbButtonText vbByte
    259 syn keyword vbDefine vbCalGreg vbCalHijri vbCancel vbCr vbCritical
    260 syn keyword vbDefine vbCrLf vbCurrency vbCyan vbDatabaseCompare
    261 syn keyword vbDefine vbDataObject vbDate vbDecimal vbDefaultButton1
    262 syn keyword vbDefine vbDefaultButton2 vbDefaultButton3 vbDefaultButton4
    263 syn keyword vbDefine vbDesktop vbDirectory vbDouble vbEmpty vbError
    264 syn keyword vbDefine vbExclamation vbFirstFourDays vbFirstFullWeek
    265 syn keyword vbDefine vbFirstJan1 vbFormCode vbFormControlMenu
    266 syn keyword vbDefine vbFormFeed vbFormMDIForm vbFriday vbFromUnicode
    267 syn keyword vbDefine vbGrayText vbGreen vbHidden vbHide vbHighlight
    268 syn keyword vbDefine vbHighlightText vbHiragana vbIgnore vbIMEAlphaDbl
    269 syn keyword vbDefine vbIMEAlphaSng vbIMEDisable vbIMEHiragana
    270 syn keyword vbDefine vbIMEKatakanaDbl vbIMEKatakanaSng vbIMEModeAlpha
    271 syn keyword vbDefine vbIMEModeAlphaFull vbIMEModeDisable
    272 syn keyword vbDefine vbIMEModeHangul vbIMEModeHangulFull
    273 syn keyword vbDefine vbIMEModeHiragana vbIMEModeKatakana
    274 syn keyword vbDefine vbIMEModeKatakanaHalf vbIMEModeNoControl
    275 syn keyword vbDefine vbIMEModeOff vbIMEModeOn vbIMENoOp vbIMEOff
    276 syn keyword vbDefine vbIMEOn vbInactiveBorder vbInactiveCaptionText
    277 syn keyword vbDefine vbInactiveTitleBar vbInfoBackground vbInformation
    278 syn keyword vbDefine vbInfoText vbInteger vbKatakana vbKey0 vbKey1
    279 syn keyword vbDefine vbKey2 vbKey3 vbKey4 vbKey5 vbKey6 vbKey7 vbKey8
    280 syn keyword vbDefine vbKey9 vbKeyA vbKeyAdd vbKeyB vbKeyBack vbKeyC
    281 syn keyword vbDefine vbKeyCancel vbKeyCapital vbKeyClear vbKeyControl
    282 syn keyword vbDefine vbKeyD vbKeyDecimal vbKeyDelete vbKeyDivide
    283 syn keyword vbDefine vbKeyDown vbKeyE vbKeyEnd vbKeyEscape vbKeyExecute
    284 syn keyword vbDefine vbKeyF vbKeyF1 vbKeyF10 vbKeyF11 vbKeyF12 vbKeyF13
    285 syn keyword vbDefine vbKeyF14 vbKeyF15 vbKeyF16 vbKeyF2 vbKeyF3 vbKeyF4
    286 syn keyword vbDefine vbKeyF5 vbKeyF6 vbKeyF7 vbKeyF8 vbKeyF9 vbKeyG
    287 syn keyword vbDefine vbKeyH vbKeyHelp vbKeyHome vbKeyI vbKeyInsert
    288 syn keyword vbDefine vbKeyJ vbKeyK vbKeyL vbKeyLButton vbKeyLeft vbKeyM
    289 syn keyword vbDefine vbKeyMButton vbKeyMenu vbKeyMultiply vbKeyN
    290 syn keyword vbDefine vbKeyNumlock vbKeyNumpad0 vbKeyNumpad1
    291 syn keyword vbDefine vbKeyNumpad2 vbKeyNumpad3 vbKeyNumpad4
    292 syn keyword vbDefine vbKeyNumpad5 vbKeyNumpad6 vbKeyNumpad7
    293 syn keyword vbDefine vbKeyNumpad8 vbKeyNumpad9 vbKeyO vbKeyP
    294 syn keyword vbDefine vbKeyPageDown vbKeyPageUp vbKeyPause vbKeyPrint
    295 syn keyword vbDefine vbKeyQ vbKeyR vbKeyRButton vbKeyReturn vbKeyRight
    296 syn keyword vbDefine vbKeyS vbKeySelect vbKeySeparator vbKeyShift
    297 syn keyword vbDefine vbKeySnapshot vbKeySpace vbKeySubtract vbKeyT
    298 syn keyword vbDefine vbKeyTab vbKeyU vbKeyUp vbKeyV vbKeyW vbKeyX
    299 syn keyword vbDefine vbKeyY vbKeyZ vbLf vbLong vbLowerCase vbMagenta
    300 syn keyword vbDefine vbMaximizedFocus vbMenuBar vbMenuText
    301 syn keyword vbDefine vbMinimizedFocus vbMinimizedNoFocus vbMonday
    302 syn keyword vbDefine vbMsgBox vbMsgBoxHelpButton vbMsgBoxRight
    303 syn keyword vbDefine vbMsgBoxRtlReading vbMsgBoxSetForeground
    304 syn keyword vbDefine vbMsgBoxText vbNarrow vbNewLine vbNo vbNormal
    305 syn keyword vbDefine vbNormalFocus vbNormalNoFocus vbNull vbNullChar
    306 syn keyword vbDefine vbNullString vbObject vbObjectError vbOK
    307 syn keyword vbDefine vbOKCancel vbOKOnly vbProperCase vbQuestion
    308 syn keyword vbDefine vbReadOnly vbRed vbRetry vbRetryCancel vbSaturday
    309 syn keyword vbDefine vbScrollBars vbSingle vbString vbSunday vbSystem
    310 syn keyword vbDefine vbSystemModal vbTab vbTextCompare vbThursday
    311 syn keyword vbDefine vbTitleBarText vbTuesday vbUnicode vbUpperCase
    312 syn keyword vbDefine vbUseSystem vbUseSystemDayOfWeek vbVariant
    313 syn keyword vbDefine vbVerticalTab vbVolume vbWednesday vbWhite vbWide
    314 syn keyword vbDefine vbWindowBackground vbWindowFrame vbWindowText
    315 syn keyword vbDefine vbYellow vbYes vbYesNo vbYesNoCancel
    316 
    317 "Numbers
    318 "integer number, or floating point number without a dot.
    319 syn match vbNumber "\<\d\+\>"
    320 "floating point number, with dot
    321 syn match vbNumber "\<\d\+\.\d*\>"
    322 "floating point number, starting with a dot
    323 syn match vbNumber "\.\d\+\>"
    324 "syn match  vbNumber            "{[[:xdigit:]-]\+}\|&[hH][[:xdigit:]]\+&"
    325 "syn match  vbNumber            ":[[:xdigit:]]\+"
    326 "syn match  vbNumber            "[-+]\=\<\d\+\>"
    327 syn match  vbFloat              "[-+]\=\<\d\+[eE][\-+]\=\d\+"
    328 syn match  vbFloat              "[-+]\=\<\d\+\.\d*\([eE][\-+]\=\d\+\)\="
    329 syn match  vbFloat              "[-+]\=\<\.\d\+\([eE][\-+]\=\d\+\)\="
    330 
    331 " String and Character constants
    332 syn region  vbString		start=+"+  end=+"\|$+
    333 syn region  vbComment		start="\(^\|\s\)REM\s" end="$" contains=vbTodo
    334 syn region  vbComment		start="\(^\|\s\)\'"   end="$" contains=vbTodo
    335 syn match   vbLineLabel		"^\h\w\+:"
    336 syn match   vbLineNumber	"^\d\+\(:\|\s\|$\)"
    337 syn match   vbTypeSpecifier  "\<\a\w*[@\$%&!#]"ms=s+1
    338 syn match   vbTypeSpecifier  "#[a-zA-Z0-9]"me=e-1
    339 " Conditional Compilation
    340 syn match  vbPreProc "^#const\>"
    341 syn region vbPreProc matchgroup=PreProc start="^#if\>"     end="\<then\>" transparent contains=TOP
    342 syn region vbPreProc matchgroup=PreProc start="^#elseif\>" end="\<then\>" transparent contains=TOP
    343 syn match  vbPreProc "^#else\>"
    344 syn match  vbPreProc "^#end\s*if\>"
    345 
    346 " Define the default highlighting.
    347 " Only when an item doesn't have highlighting yet
    348 
    349 hi def link vbBoolean           Boolean
    350 hi def link vbLineNumber        Comment
    351 hi def link vbLineLabel         Comment
    352 hi def link vbComment           Comment
    353 hi def link vbConditional       Conditional
    354 hi def link vbConst             Constant
    355 hi def link vbDefine            Constant
    356 hi def link vbError             Error
    357 hi def link vbFunction          Identifier
    358 hi def link vbIdentifier        Identifier
    359 hi def link vbNumber            Number
    360 hi def link vbFloat             Float
    361 hi def link vbMethods           PreProc
    362 hi def link vbOperator          Operator
    363 hi def link vbRepeat            Repeat
    364 hi def link vbString            String
    365 hi def link vbStatement         Statement
    366 hi def link vbKeyword           Statement
    367 hi def link vbEvents            Special
    368 hi def link vbTodo              Todo
    369 hi def link vbTypes             Type
    370 hi def link vbTypeSpecifier     Type
    371 hi def link vbPreProc           PreProc
    372 
    373 let b:current_syntax = "vb"
    374 
    375 " vim: ts=8