Должно быть как-то так:

Dim myDI As DirectoryInfo
myDI = CreateDirectory( FolderBrowserDialog1.SelectedPath)

либо же так, но я не уверен в нотации для VB.NET
CreateDirectory FolderBrowserDialog1.SelectedPath