Visual Basic - crear carpeta

Gracias por su atencion.
¿Como puedo crear una carpeta en el registro mediante un boton en un formulario?

El boton tiene que mirar si la carpeta existe ya con el mismo nombre, si no existe, la crea y sino nos avisara que ya existe, como podemos hacer todo esto??. GRacias

hola jose:

mira yo creo varias carpetas cundo inicializo mi programa te adjunto el codigo para que lo pruebes.
agrega la sentecia else para dar mensaje que larpeta existe

If Dir(App.Path & "\Actualiza", vbDirectory) = "" Then
MkDir App.Path & "\Actualiza"
End If
If Dir(App.Path & "\Ordenes", vbDirectory) = "" Then
MkDir App.Path & "\Ordenes"
End If
If Dir(App.Path & "\Archivos", vbDirectory) = "" Then
MkDir App.Path & "\Archivos"
End If
If Dir(App.Path & "\Respaldos", vbDirectory) = "" Then
MkDir App.Path & "\Respaldos"
End If

espero haberte ayudado

chao Cristian Guerra