Visual Basic - Det. si existe una carpeta, Urgente!!

Hola Alguien puede decir como determino si existe una carpeta en mi disco duro o en cualquier unida.

Probastes con por ejemplo:
if DIR("C:\ejemplo") then

else
end if

disculpa dispare el mensaje sin terminarlo...
Probastes con por ejemplo:
if DIR("C:\ejemplo") then
msgbox "El directorio ejemplo existe"
else
msgbox "El directorio ejmeplo no existe"
end if

puedes probar usando FileSystemObject:

dim fso As Scripting.FileSystemObject
Set fso = New Scripting.FileSystemObject

If fso.FolderExists(RutaDestino) Then
else
end if

espero te sirva

Muchas Gracias A Todos