To Declare a variable at runtime, use this code

Code:
If IShouldDeclareThis = 1 Then
    Dim a As Integer
End If