I dropped the folder checking and went for the simpler code: Thanks Sanisa
Private Sub Browse_Click(sender As Object, e As EventArgs) Handles Browse.Click
If (FolderBrowserDialog1.ShowDialog() = Windows.Forms.DialogResult.OK) Then
TextBox1.Text = FolderBrowserDialog1.SelectedPath
End If
End Sub