Visual Basic - Existencia de un archivo

se que para saber si un archivo existe coloco esta linea de codigo

if dir(destino) = "*.*" then .......

pero este comando no me sirve si qiuero saber la existencia de una carpeta!!! como puedo colocarlo?

Private Sub Command1_Click()
a = Dir$("C:\Windows", vbDirectory)
If a = "" Then
MsgBox ("El directorio no existe!")
Else
MsgBox ("El directorio existe!")
End If
End Sub