Easy way to put together directory and filename in the click even of the 'File1' control

by Masters@Work (2 Submissions)
Category: String Manipulation
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Tue 23^rd December 2003
Date Added: Mon 8^th February 2021
Rating: (1 Votes)

Rate Easy way to put together directory and filename in the click even of the 'File1' control



'1 dirdistdox and 1 dilelistbox
'leave there names as default names.

private sub drive1_change()
on error resume next
    dir1.path = drive1.drive
end sub

private sub dir1_change()
    file1.path = dir1.path
end sub

private sub file1_click()
'RELIVENT CODE:
    dim readystring as string
    if right$(dir1.path,1) = "\" then 'determine weather thers a "\" at the end of the dir1 path
        readystring = dir1.path & file1.filename
    else
        readystring = dir1.path & "\" & file1.filename
    end if
msgbox readystring
end sub

Download this snippet Add to My Saved Code

Easy way to put together directory and filename in the click even of the 'File1' control Comments

No comments have been posted about Easy way to put together directory and filename in the click even of the 'File1' control. Why not be the first to post a comment about Easy way to put together directory and filename in the click even of the 'File1' control.

Easy way to put together directory and filename in the click even of the 'File1' control

Easy way to put together directory and filename in the click even of the 'File1' control Comments

Post your comment

Difficulty