Commit | Line | Data |
---|---|---|
6a1aa64f DV |
1 | dp.sh.Brushes.Vb = function() |
2 | { | |
3 | var keywords = 'AddHandler AddressOf AndAlso Alias And Ansi As Assembly Auto ' + | |
4 | 'Boolean ByRef Byte ByVal Call Case Catch CBool CByte CChar CDate ' + | |
5 | 'CDec CDbl Char CInt Class CLng CObj Const CShort CSng CStr CType ' + | |
6 | 'Date Decimal Declare Default Delegate Dim DirectCast Do Double Each ' + | |
7 | 'Else ElseIf End Enum Erase Error Event Exit False Finally For Friend ' + | |
8 | 'Function Get GetType GoSub GoTo Handles If Implements Imports In ' + | |
9 | 'Inherits Integer Interface Is Let Lib Like Long Loop Me Mod Module ' + | |
10 | 'MustInherit MustOverride MyBase MyClass Namespace New Next Not Nothing ' + | |
11 | 'NotInheritable NotOverridable Object On Option Optional Or OrElse ' + | |
12 | 'Overloads Overridable Overrides ParamArray Preserve Private Property ' + | |
13 | 'Protected Public RaiseEvent ReadOnly ReDim REM RemoveHandler Resume ' + | |
14 | 'Return Select Set Shadows Shared Short Single Static Step Stop String ' + | |
15 | 'Structure Sub SyncLock Then Throw To True Try TypeOf Unicode Until ' + | |
16 | 'Variant When While With WithEvents WriteOnly Xor'; | |
17 | ||
18 | this.regexList = [ | |
19 | { regex: new RegExp('\'.*$', 'gm'), css: 'comment' }, // one line comments | |
20 | { regex: new RegExp('"(?:\\.|[^\\""])*"', 'g'), css: 'string' }, // strings | |
21 | { regex: new RegExp('^\\s*#.*', 'gm'), css: 'preprocessor' }, // preprocessor tags like #region and #endregion | |
22 | { regex: new RegExp(this.GetKeywords(keywords), 'gm'), css: 'keyword' } // c# keyword | |
23 | ]; | |
24 | ||
25 | this.CssClass = 'dp-vb'; | |
26 | } | |
27 | ||
28 | dp.sh.Brushes.Vb.prototype = new dp.sh.Highlighter(); | |
29 | dp.sh.Brushes.Vb.Aliases = ['vb', 'vb.net']; |