runtime/syntax/vb.vim

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