Удобный выбор папки - VB

Формулировка задачи:

Надо на форме получать путь к папке в текстовом виде. Не могу найти ничего подходящего и готового. Т.е. надо нечто подобное CommonDialog\ShowOpen, только для выбора папок, а не файлов. Заранее благодарен!

Решение задачи: «Удобный выбор папки»

textual
                            Листинг программы 
                        

                            Private Sub Drive1_Change()
Dir1.Path = Drive1.Drive
End Sub
 
Private Sub dir1_click()
Text1.Text = Dir1.Path
End Sub
                        

Оцени полезность:

8 голосов , оценка 3.75 из 5

Похожие ответы