text/x-vbnet;text/x-vb
*.vb
'
"
"
^\s*#\s*
(define|undef|if(n?def)?|else|elif|end if|line|error|region|end region)
\b
addhandler
addressof
alias
and
andalso
ansi
as
assembly
auto
binary
byref
byval
call
case
catch
cbool
cbyte
cchar
cdate
cdec
cdbl
cint
class
clng
cobj
compare
const
cshort
csng
cstr
ctype
declare
default
delegate
dim
do
each
else
elseif
end
enum
erase
error
event
exit
explicit
finally
for
friend
function
get
goto
handles
if
implements
imports
in
inherits
integer
interface
is
let
lib
like
loop
me
mod
module
mustinherit
mustoverride
mybase
myclass
namespace
new
next
not
notinheritable
notoverridable
off
on
option
optional
or
orelse
overloads
overridable
overrides
param_array
preserve
private
property
protected
public
raiseevent
readonly
redim
rem
removehandler
resume
return
select
set
shadows
shared
sizeof
static
step
stop
strict
structure
sub
synclock
text
then
throw
to
try
typeof
unicode
until
variant
when
while
with
withevents
writeonly
xor
yield
boolean
byte
char
date
decimal
double
long
object
short
single
string
nothing
null
false
true