اخي اذا ما صار معك الكود الاول جرب هاد الكود
في الكود الثاني بس غير D:\g\ لمسار المجلد اللي بدك تختار منو
PHP كود :
Dim txtbox As New TextBox
Dim f As New FolderBrowserDialog
f.SelectedPath = "D:\g\"
If f.ShowDialog = Windows.Forms.DialogResult.OK Then
txtbox.Text = f.SelectedPath
Dim ddee As String = Path.GetDirectoryName(txtbox.Text)
ddee = txtbox.Text.Replace(ddee, "")
TextBox1.Text = ddee.Replace("\", "")
End If
في الكود الثاني بس غير D:\g\ لمسار المجلد اللي بدك تختار منو
