by King Seh Horng (15 Submissions)
Category: Custom Controls/Forms/Menus
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Thu 11th April 2002
Date Added: Mon 8th February 2021
Rating: (1 Votes)
Open path with the use of common dialog
' Insert this code to a command button or a label
cd1.filter = "Text file (*.txt)|*.txt|GIF (*.gif)|*.gif"
cd.dialogtitle = "Open file" 'The caption of the common dialog
cd.initdir = "C:\" 'The path in which is loaded
cd.showopen
let fn = cd.filename
'fn is then the path of the selected items or files
'For further details about my code, pls e-mail me at [email protected]