"
"
(?<=(^\s*))\#
(?<!(^\s*))\#
\#
'''
'
\bREM\b
Boolean
Byte
Char
Date
Decimal
Double
Integer
Long
Object
SByte
Short
Single
String
UInteger
ULong
UShort
Variant
AddressOf
And
AndAlso
Await
Is
IsNot
Like
Mod
New
Not
Or
OrElse
Xor
False
Me
MyBase
MyClass
Nothing
True
CBool
CByte
CChar
CDate
CDbl
CDec
CInt
CLng
CObj
CSByte
CShort
CSng
CStr
CType
CUInt
CULng
CUShort
DirectCast
GetType
GetXmlNamespace
IIf
TryCast
TypeOf
AddHandler
Alias
As
ByRef
ByVal
Call
Case
Catch
Class
Const
Continue
Declare
Default
Delegate
Dim
Do
Each
Else
ElseIf
End
EndIf
Enum
Erase
Error
Event
Exit
Finally
For
Friend
Function
Get
Global
GoSub
GoTo
Handles
If
Implements
Imports
In
Inherits
Interface
Let
Lib
Loop
Module
MustInherit
MustOverride
Namespace
Narrowing
New
Next
NotInheritable
NotOverridable
Of
On
Operator
Option
Optional
Overloads
Overridable
Overrides
ParamArray
Partial
Private
Property
Protected
Public
RaiseEvent
ReadOnly
ReDim
RemoveHandler
Resume
Return
Select
Set
Shadows
Shared
Static
Step
Stop
Structure
Sub
SyncLock
Then
Throw
To
Try
Using
Wend
When
While
Widening
With
WithEvents
WriteOnly
Aggregate
Ansi
Ascending
Async
Auto
Binary
By
Compare
Custom
Descending
Distinct
Equals
Explicit
From
Group
Infer
Into
Iterator
Join
Key
Off
Preserve
Skip
Strict
Take
Text
Unicode
Until
Where
Yield
Const
Else
ElseIf
End
ExternalChecksum
ExternalSource
If
Region