Crear carpeta o directorio en Visual Basic 6.0 (VB 6.0)

Agrega una referencia a la librería (¿Cómo agregar librerías?): Microsoft Scripting Runtime 

Luego declaras una variable: Dim p As New FileSystemObject 
Y para crear carpetas usas: p.CreateFolder "c:\tucarpeta"