Selecting a FOLDER in VB.
Selecting a FOLDER in VB.
API Declarations
'Just copy and paste this code and don't forget to add 1 command button to form
Private shlShell As Shell32.Shell
Private shlFolder As Shell32.Folder
Private Const RETURNONLYFSDIR = &H1
Rate Selecting a FOLDER in VB.
(1(1 Vote))
Set shlShell = New Shell32.Shell
Set shlFolder = shlShell.BrowseForFolder(Me.hWnd, "Select a Folder.......", RETURNONLYDIR)
If Not shlFolder Is Nothing Then
MsgBox shlFolder.Self.Path
End If
End Sub
Selecting a FOLDER in VB. Comments
No comments yet — be the first to post one!
Post a Comment