274 lines
13 KiB
VimL
274 lines
13 KiB
VimL
" Vim syntax file
|
|
" Language: Visual Basic
|
|
" Maintainer: Tim Chase <vb.vim@tim.thechases.com>
|
|
" Former Maintainer: Robert M. Cortopassi <cortopar@mindspring.com>
|
|
" (tried multiple times to contact, but email bounced)
|
|
" Last Change: 2004 May 25
|
|
" 2004 May 30 Added a few keywords
|
|
|
|
" This was thrown together after seeing numerous requests on the
|
|
" VIM and VIM-DEV mailing lists. It is by no means complete.
|
|
" Send comments, suggestions and requests to the maintainer.
|
|
|
|
" For version 5.x: Clear all syntax items
|
|
" For version 6.x: Quit when a syntax file was already loaded
|
|
if version < 600
|
|
syntax clear
|
|
elseif exists("b:current_syntax")
|
|
finish
|
|
endif
|
|
|
|
" VB is case insensitive
|
|
syn case ignore
|
|
|
|
syn keyword vbStatement Alias AppActivate As Base Beep Call Case
|
|
syn keyword vbStatement ChDir ChDrive Const Declare DefBool DefByte
|
|
syn keyword vbStatement DefCur DefDate DefDbl DefDec DefInt
|
|
syn keyword vbStatement DefLng DefObj DefSng DefStr Deftype
|
|
syn keyword vbStatement DefVar DeleteSetting Dim Do Each Else
|
|
syn keyword vbStatement ElseIf End Enum Erase Event Exit Explicit
|
|
syn keyword vbStatement FileCopy For ForEach Function Get GoSub
|
|
syn keyword vbStatement GoTo If Implements Kill Let Lib LineInput
|
|
syn keyword vbStatement Lock Loop LSet MkDir Name Next OnError On
|
|
syn keyword vbStatement Option Preserve Private Property Public Put
|
|
syn keyword vbStatement RaiseEvent Randomize ReDim Reset Resume
|
|
syn keyword vbStatement Return RmDir RSet SavePicture SaveSetting
|
|
syn keyword vbStatement SendKeys Select SetAttr Static Step Sub
|
|
syn keyword vbStatement Then Type Unlock Until Wend While Width
|
|
syn keyword vbStatement With Write
|
|
|
|
syn keyword vbFunction Abs Array Asc AscB AscW Atn Avg CBool
|
|
syn keyword vbFunction CByte CCur CDate CDbl Cdec Choose Chr
|
|
syn keyword vbFunction ChrB ChrW CInt CLng Command Cos Count
|
|
syn keyword vbFunction CreateObject CSng CStr CurDir CVar
|
|
syn keyword vbFunction CVDate CVErr DateAdd DateDiff DatePart
|
|
syn keyword vbFunction DateSerial DateValue Day DDB Dir
|
|
syn keyword vbFunction DoEvents Environ EOF Error Exp FileAttr
|
|
syn keyword vbFunction FileDateTime FileLen Fix Format FreeFile
|
|
syn keyword vbFunction FV GetAllStrings GetAttr
|
|
syn keyword vbFunction GetAutoServerSettings GetObject
|
|
syn keyword vbFunction GetSetting Hex Hour IIf IMEStatus Input
|
|
syn keyword vbFunction InputB InputBox InStr InstB Int IPmt
|
|
syn keyword vbFunction IsArray IsDate IsEmpty IsError IsMissing
|
|
syn keyword vbFunction IsNull IsNumeric IsObject LBound LCase
|
|
syn keyword vbFunction Left LeftB Len LenB LoadPicture Loc LOF
|
|
syn keyword vbFunction Log LTrim Max Mid MidB Min Minute MIRR
|
|
syn keyword vbFunction Month MsgBox Now NPer NPV Oct Partition
|
|
syn keyword vbFunction Pmt PPmt PV QBColor Rate RGB Right
|
|
syn keyword vbFunction RightB Rnd RTrim Second Seek Sgn Shell
|
|
syn keyword vbFunction Sin SLN Space Spc Sqr StDev StDevP Str
|
|
syn keyword vbFunction StrComp StrConv String Switch Sum SYD
|
|
syn keyword vbFunction Tab Tan Time Timer TimeSerial TimeValue
|
|
syn keyword vbFunction Trim TypeName UBound UCase Val Var VarP
|
|
syn keyword vbFunction VarType Weekday Year
|
|
|
|
syn keyword vbMethods Accept Activate Add AddCustom AddFile
|
|
syn keyword vbMethods AddFromFile AddFromTemplate AddItem
|
|
syn keyword vbMethods AddNew AddToAddInToolbar
|
|
syn keyword vbMethods AddToolboxProgID Append AppendChunk
|
|
syn keyword vbMethods Arrange Assert AsyncRead BatchUpdate
|
|
syn keyword vbMethods BeginTrans Bind Cancel CancelAsyncRead
|
|
syn keyword vbMethods CancelBatch CancelUpdate
|
|
syn keyword vbMethods CanPropertyChange CaptureImage CellText
|
|
syn keyword vbMethods CellValue Circle Clear ClearFields
|
|
syn keyword vbMethods ClearSel ClearSelCols Clone Close Cls
|
|
syn keyword vbMethods ColContaining ColumnSize CommitTrans
|
|
syn keyword vbMethods CompactDatabase Compose Connect Copy
|
|
syn keyword vbMethods CopyQueryDef CreateDatabase
|
|
syn keyword vbMethods CreateDragImage CreateEmbed CreateField
|
|
syn keyword vbMethods CreateGroup CreateIndex CreateLink
|
|
syn keyword vbMethods CreatePreparedStatement CreatePropery
|
|
syn keyword vbMethods CreateQuery CreateQueryDef
|
|
syn keyword vbMethods CreateRelation CreateTableDef CreateUser
|
|
syn keyword vbMethods CreateWorkspace Customize Delete
|
|
syn keyword vbMethods DeleteColumnLabels DeleteColumns
|
|
syn keyword vbMethods DeleteRowLabels DeleteRows DoVerb Drag
|
|
syn keyword vbMethods Draw Edit EditCopy EditPaste EndDoc
|
|
syn keyword vbMethods EnsureVisible EstablishConnection
|
|
syn keyword vbMethods Execute ExtractIcon Fetch FetchVerbs
|
|
syn keyword vbMethods Files FillCache Find FindFirst FindItem
|
|
syn keyword vbMethods FindLast FindNext FindPrevious Forward
|
|
syn keyword vbMethods GetBookmark GetChunk GetClipString
|
|
syn keyword vbMethods GetData GetFirstVisible GetFormat
|
|
syn keyword vbMethods GetHeader GetLineFromChar GetNumTicks
|
|
syn keyword vbMethods GetRows GetSelectedPart GetText
|
|
syn keyword vbMethods GetVisibleCount GoBack GoForward Hide
|
|
syn keyword vbMethods HitTest HoldFields Idle InitializeLabels
|
|
syn keyword vbMethods InsertColumnLabels InsertColumns
|
|
syn keyword vbMethods InsertObjDlg InsertRowLabels InsertRows
|
|
syn keyword vbMethods Item KillDoc Layout Line LinkExecute
|
|
syn keyword vbMethods LinkPoke LinkRequest LinkSend Listen
|
|
syn keyword vbMethods LoadFile LoadResData LoadResPicture
|
|
syn keyword vbMethods LoadResString LogEvent MakeCompileFile
|
|
syn keyword vbMethods MakeReplica MoreResults Move MoveData
|
|
syn keyword vbMethods MoveFirst MoveLast MoveNext MovePrevious
|
|
syn keyword vbMethods NavigateTo NewPage NewPassword
|
|
syn keyword vbMethods NextRecordset OLEDrag OnAddinsUpdate
|
|
syn keyword vbMethods OnConnection OnDisconnection
|
|
syn keyword vbMethods OnStartupComplete Open OpenConnection
|
|
syn keyword vbMethods OpenDatabase OpenQueryDef OpenRecordset
|
|
syn keyword vbMethods OpenResultset OpenURL Overlay
|
|
syn keyword vbMethods PaintPicture Paste PastSpecialDlg
|
|
syn keyword vbMethods PeekData Play Point PopulatePartial
|
|
syn keyword vbMethods PopupMenu Print PrintForm
|
|
syn keyword vbMethods PropertyChanged PSet Quit Raise
|
|
syn keyword vbMethods RandomDataFill RandomFillColumns
|
|
syn keyword vbMethods RandomFillRows rdoCreateEnvironment
|
|
syn keyword vbMethods rdoRegisterDataSource ReadFromFile
|
|
syn keyword vbMethods ReadProperty Rebind ReFill Refresh
|
|
syn keyword vbMethods RefreshLink RegisterDatabase Reload
|
|
syn keyword vbMethods Remove RemoveAddInFromToolbar RemoveItem
|
|
syn keyword vbMethods Render RepairDatabase Reply ReplyAll
|
|
syn keyword vbMethods Requery ResetCustom ResetCustomLabel
|
|
syn keyword vbMethods ResolveName RestoreToolbar Resync
|
|
syn keyword vbMethods Rollback RollbackTrans RowBookmark
|
|
syn keyword vbMethods RowContaining RowTop Save SaveAs
|
|
syn keyword vbMethods SaveFile SaveToFile SaveToolbar
|
|
syn keyword vbMethods SaveToOle1File Scale ScaleX ScaleY
|
|
syn keyword vbMethods Scroll SelectAll SelectPart SelPrint
|
|
syn keyword vbMethods Send SendData Set SetAutoServerSettings
|
|
syn keyword vbMethods SetData SetFocus SetOption SetSize
|
|
syn keyword vbMethods SetText SetViewport Show ShowColor
|
|
syn keyword vbMethods ShowFont ShowHelp ShowOpen ShowPrinter
|
|
syn keyword vbMethods ShowSave ShowWhatsThis SignOff SignOn
|
|
syn keyword vbMethods Size Span SplitContaining StartLabelEdit
|
|
syn keyword vbMethods StartLogging Stop Synchronize TextHeight
|
|
syn keyword vbMethods TextWidth ToDefaults TwipsToChartPart
|
|
syn keyword vbMethods TypeByChartType Update UpdateControls
|
|
syn keyword vbMethods UpdateRecord UpdateRow Upto
|
|
syn keyword vbMethods WhatsThisMode WriteProperty ZOrder
|
|
|
|
syn keyword vbEvents AccessKeyPress AfterAddFile
|
|
syn keyword vbEvents AfterChangeFileName AfterCloseFile
|
|
syn keyword vbEvents AfterColEdit AfterColUpdate AfterDelete
|
|
syn keyword vbEvents AfterInsert AfterLabelEdit
|
|
syn keyword vbEvents AfterRemoveFile AfterUpdate
|
|
syn keyword vbEvents AfterWriteFile AmbienChanged
|
|
syn keyword vbEvents ApplyChanges Associate AsyncReadComplete
|
|
syn keyword vbEvents AxisActivated AxisLabelActivated
|
|
syn keyword vbEvents AxisLabelSelected AxisLabelUpdated
|
|
syn keyword vbEvents AxisSelected AxisTitleActivated
|
|
syn keyword vbEvents AxisTitleSelected AxisTitleUpdated
|
|
syn keyword vbEvents AxisUpdated BeforeClick BeforeColEdit
|
|
syn keyword vbEvents BeforeColUpdate BeforeConnect
|
|
syn keyword vbEvents BeforeDelete BeforeInsert
|
|
syn keyword vbEvents BeforeLabelEdit BeforeLoadFile
|
|
syn keyword vbEvents BeforeUpdate ButtonClick ButtonCompleted
|
|
syn keyword vbEvents ButtonGotFocus ButtonLostFocus Change
|
|
syn keyword vbEvents ChartActivated ChartSelected
|
|
syn keyword vbEvents ChartUpdated Click ColEdit Collapse
|
|
syn keyword vbEvents ColResize ColumnClick Compare
|
|
syn keyword vbEvents ConfigChageCancelled ConfigChanged
|
|
syn keyword vbEvents ConnectionRequest DataArrival
|
|
syn keyword vbEvents DataChanged DataUpdated DblClick
|
|
syn keyword vbEvents Deactivate DeviceArrival
|
|
syn keyword vbEvents DeviceOtherEvent DeviceQueryRemove
|
|
syn keyword vbEvents DeviceQueryRemoveFailed
|
|
syn keyword vbEvents DeviceRemoveComplete DeviceRemovePending
|
|
syn keyword vbEvents DevModeChange Disconnect DisplayChanged
|
|
syn keyword vbEvents Dissociate DoGetNewFileName Done
|
|
syn keyword vbEvents DonePainting DownClick DragDrop DragOver
|
|
syn keyword vbEvents DropDown EditProperty EnterCell
|
|
syn keyword vbEvents EnterFocus ExitFocus Expand
|
|
syn keyword vbEvents FootnoteActivated FootnoteSelected
|
|
syn keyword vbEvents FootnoteUpdated GotFocus HeadClick
|
|
syn keyword vbEvents InfoMessage Initialize IniProperties
|
|
syn keyword vbEvents ItemActivated ItemAdded ItemCheck
|
|
syn keyword vbEvents ItemClick ItemReloaded ItemRemoved
|
|
syn keyword vbEvents ItemRenamed ItemSeletected KeyDown
|
|
syn keyword vbEvents KeyPress KeyUp LeaveCell LegendActivated
|
|
syn keyword vbEvents LegendSelected LegendUpdated LinkClose
|
|
syn keyword vbEvents LinkError LinkNotify LinkOpen Load
|
|
syn keyword vbEvents LostFocus MouseDown MouseMove MouseUp
|
|
syn keyword vbEvents NodeClick ObjectMove OLECompleteDrag
|
|
syn keyword vbEvents OLEDragDrop OLEDragOver OLEGiveFeedback
|
|
syn keyword vbEvents OLESetData OLEStartDrag OnAddNew OnComm
|
|
syn keyword vbEvents Paint PanelClick PanelDblClick
|
|
syn keyword vbEvents PathChange PatternChange PlotActivated
|
|
syn keyword vbEvents PlotSelected PlotUpdated PointActivated
|
|
syn keyword vbEvents PointLabelActivated PointLabelSelected
|
|
syn keyword vbEvents PointLabelUpdated PointSelected
|
|
syn keyword vbEvents PointUpdated PowerQuerySuspend
|
|
syn keyword vbEvents PowerResume PowerStatusChanged
|
|
syn keyword vbEvents PowerSuspend QueryChangeConfig
|
|
syn keyword vbEvents QueryComplete QueryCompleted
|
|
syn keyword vbEvents QueryTimeout QueryUnload ReadProperties
|
|
syn keyword vbEvents Reposition RequestChangeFileName
|
|
syn keyword vbEvents RequestWriteFile Resize ResultsChanged
|
|
syn keyword vbEvents RowColChange RowCurrencyChange RowResize
|
|
syn keyword vbEvents RowStatusChanged SelChange
|
|
syn keyword vbEvents SelectionChanged SendComplete
|
|
syn keyword vbEvents SendProgress SeriesActivated
|
|
syn keyword vbEvents SeriesSelected SeriesUpdated
|
|
syn keyword vbEvents SettingChanged SplitChange StateChanged
|
|
syn keyword vbEvents StatusUpdate SysColorsChanged Terminate
|
|
syn keyword vbEvents TimeChanged TitleActivated TitleSelected
|
|
syn keyword vbEvents TitleActivated UnboundAddData
|
|
syn keyword vbEvents UnboundDeleteRow
|
|
syn keyword vbEvents UnboundGetRelativeBookmark
|
|
syn keyword vbEvents UnboundReadData UnboundWriteData Unload
|
|
syn keyword vbEvents UpClick Updated Validate ValidationError
|
|
syn keyword vbEvents WillAssociate WillChangeData
|
|
syn keyword vbEvents WillDissociate WillExecute
|
|
syn keyword vbEvents WillUpdateRows WriteProperties
|
|
|
|
syn keyword vbTypes Boolean Byte Currency Date Decimal
|
|
syn keyword vbTypes Double Empty Integer Long Single String
|
|
|
|
syn match vbOperator "[()+.,\-/*=&]"
|
|
syn match vbOperator "[<>]=\="
|
|
syn match vbOperator "<>"
|
|
syn match vbOperator "\s\+_$"
|
|
syn keyword vbOperator And Or Not Xor Mod In Is Imp Eqv
|
|
syn keyword vbOperator To ByVal ByRef
|
|
syn keyword vbConst True False Null Nothing
|
|
|
|
syn keyword vbTodo contained TODO
|
|
|
|
"integer number, or floating point number without a dot.
|
|
syn match vbNumber "\<\d\+\>"
|
|
"floating point number, with dot
|
|
syn match vbNumber "\<\d\+\.\d*\>"
|
|
"floating point number, starting with a dot
|
|
syn match vbNumber "\.\d\+\>"
|
|
|
|
" String and Character contstants
|
|
syn region vbString start=+"+ end=+"+
|
|
syn region vbComment start="\<REM\>" end="$" contains=vbTodo
|
|
syn region vbComment start="'" end="$" contains=vbTodo
|
|
syn region vbLineNumber start="^\d" end="\s"
|
|
syn match vbTypeSpecifier "[a-zA-Z0-9][\$%&!#]"ms=s+1
|
|
|
|
" Define the default highlighting.
|
|
" For version 5.7 and earlier: only when not done already
|
|
" For version 5.8 and later: only when an item doesn't have highlighting yet
|
|
if version >= 508 || !exists("did_vb_syntax_inits")
|
|
if version < 508
|
|
let did_vb_syntax_inits = 1
|
|
command -nargs=+ HiLink hi link <args>
|
|
else
|
|
command -nargs=+ HiLink hi def link <args>
|
|
endif
|
|
|
|
HiLink vbLineNumber Comment
|
|
HiLink vbNumber Number
|
|
HiLink vbConst Constant
|
|
HiLink vbError Error
|
|
HiLink vbStatement Statement
|
|
HiLink vbString String
|
|
HiLink vbComment Comment
|
|
HiLink vbTodo Todo
|
|
HiLink vbFunction Identifier
|
|
HiLink vbMethods PreProc
|
|
HiLink vbEvents Special
|
|
HiLink vbTypeSpecifier Type
|
|
HiLink vbTypes Type
|
|
HiLink vbOperator Operator
|
|
|
|
delcommand HiLink
|
|
endif
|
|
|
|
let b:current_syntax = "vb"
|
|
|
|
" vim: ts=8
|