Simple Boolean Declaration

[Rod]

I know this must be extrememly simple, but I can't find a ref for it. I
simply want to creat a boolean variable, something like "Dated" below:

Private Sub btnDialNumber_MouseUp(Button As Integer, Shift As Integer, X As
Single, Y As Single)
Dated As Boolean
Dated = False
If Day(Date) > 7 and Dated = FalseThen
...
End If
Dated = True
End If
End Sub

 

[Dennis]

Just put the word Dim in front

Private Sub btnDialNumber_MouseUp(Button As Integer, Shift As Integer, X As
Single, Y As Single)
Dim Dated As Boolean
........