1
2
3
4
5
6
7
8
9
10
11
12
|
hljs.registerLanguage("vbnet",(()=>{"use strict";return e=>({
name:"Visual Basic .NET",aliases:["vb"],case_insensitive:!0,keywords:{
keyword:"addhandler addressof alias and andalso aggregate ansi as async assembly auto await binary by byref byval call case catch class compare const continue custom declare default delegate dim distinct do each equals else elseif end enum erase error event exit explicit finally for friend from function get global goto group handles if implements imports in inherits interface into is isfalse isnot istrue iterator join key let lib like loop me mid mod module mustinherit mustoverride mybase myclass nameof namespace narrowing new next not notinheritable notoverridable of off on operator option optional or order orelse overloads overridable overrides paramarray partial preserve private property protected public raiseevent readonly redim rem removehandler resume return select set shadows shared skip static step stop structure strict sub synclock take text then throw to try unicode until using when where while widening with withevents writeonly xor yield",
built_in:"boolean byte cbool cbyte cchar cdate cdec cdbl char cint clng cobj csbyte cshort csng cstr ctype date decimal directcast double gettype getxmlnamespace iif integer long object sbyte short single string trycast typeof uinteger ulong ushort",
literal:"true false nothing"},
illegal:"//|\\{|\\}|endif|gosub|variant|wend|^\\$ ",
contains:[e.inherit(e.QUOTE_STRING_MODE,{contains:[{begin:'""'}]
}),e.COMMENT("'","$",{returnBegin:!0,contains:[{className:"doctag",
begin:"'''|\x3c!--|--\x3e",contains:[e.PHRASAL_WORDS_MODE]},{className:"doctag",
begin:"</?",end:">",contains:[e.PHRASAL_WORDS_MODE]}]}),e.C_NUMBER_MODE,{
className:"meta",begin:"#",end:"$",keywords:{
"meta-keyword":"if else elseif end region externalsource"}}]})})());
|
