спасибки

все получилось
myDI = System.IO.Directory.CreateDirectory(FolderBrowserDialog1.SelectedPath & "\" & Me.TextBox1.Text)