Abs
Alias
And
Any
As
Boolean
ByRef
Byte
ByVal
Call
Case
CBool
CByte
CCur
CDate
CDbl
CDec
CInt
CLng
Close
Const
CSng
Currency
CVar
Date
Debug
Declare
Dim
Do
Double
Else
ElseIf
Empty
End
Enum
Error
Exit
Explicit
False
For
Function
Get
Global
GoTo
If
In
Input
Integer
Is
IsEmpty
IsNull
IsNumeric
Lib
Long
Loop
Me
New
Next
Not
Nothing
On
Open
Option
Optional
Or
ParamArray
Print
Private
Public
Put
Replace
Resume
Select
Select
Set
Single
Split
Step
String
Sub
Then
To
True
Type
Until
Variant
Wend
While
With
Xor