DirListBox is read-only. You can list all folders in (and above) a directory .Path, but not add folders. For that you will need to use FSO.

Set a reference in your proj to Microsoft Scripting Runtime.
The do something like this:

Dim FSO As New FileSystemObject
FSO.CreateFolder "C:\test\"