I.T. Discussion Community!
-Collapse +Expand
VB Classic
Search VB Classic Group:

Advanced
-Collapse +Expand VB Classic Store

Prestwood eMagazine

February Edition
Subscribe now! It's Free!
Enter your email:

   ► MB LobbyVisual Basic Classic BoardVB Classic Other Topic   Print This     

easy to solve file question

easy to solve file question in VB Classic Other topic (part of our Visual Basic Classic group).

Quick Search: question   easy solve   easy solve file  
Most Recent Post
Donnaa5dcp
Lincs
IÆm only trying to complete a really simple picture viewer.
The file list box (filGraphFiles) doesnt list any files and therefore not displayed the path in the label.
Anyone know why?

Private Sub dirCurrentDir_Change()
'when the directory changes, set the path of the
'file list box to the same value
filGraphFiles.Path = dirCurrentDir.Path
End Sub

Private Sub drvCurrentDrive_Change()
'when the current drive is changed set the path of the
'directory list box to the same as the current drive
dirCurrentDir.Path = drvCurrentDrive.Drive
filGraphFiles.Path = dirCurrentDir.Path
End Sub

Private Sub filGraphFiles_DblClick()
'if the first char on the right of the path has a "\" symbol,
'then no need to add one eg C:\
'else the path lacks \, so add it to the path eg C:\WINDOWS
If Right(filGraphicFiles.Path, 1) = "\" Then
'set the caption of the label control to the path of selected file
'appending name of the file
lblImagePath.Caption = filGraphFiles.Path & filGraphFiles.FileName
Else
'set the label caption to path of selected file
'appending a \ char and the name of the file
lblImagePath.Caption = filGraphFiles.Path & "\" & filGraphFiles.FileName
End If
'load the picture into the image control
Set imgAGraphic.Picture = LoadPicture(lblImagePath.Caption)
End Sub
 Posted 18 years ago (Thread Starter)
Comment Quote
About Donnaa5dcp -Collapse +Expand
Visit Profile
Membership pending.
Member subscribes to this thread but email is NOT VERIFIED.
Email Not Verified!
Once email is verified, we will review and approve the account.
Web Presence Hidden.
Once above is taken care of, full Profile content will display including back links, about me, my message, custom Profile html, social networking links, message board signature, company profile, etc.

Post ID #8014, No Replies Be the first!
Thread Started 10/20/2002 12:13:00 PM
View Counter=2493
Location=Lincs  
Joined=18 years ago   MB Posts=3  

Revive Thread!

Add a comment to revive this old thread and make this archived thread more useful.

Write a Comment...
Full Editor
...
Sign in...

If you are a member, Sign In. Or, you can Create a Free account now.


Anonymous Post (text-only, no HTML):

Enter your name and security key.

Your Name:
Security key = P1242A1
Enter key:
Icon: A Post    Thread    Idea    Important!    Cool    Sad    No    Yes    Includes a Link...   
Thread #8014 Counter
2493
Since 4/2/2008

Follow PrestwoodBoards on: 


©1995-2020 PrestwoodBoards  [Security & Privacy]
Professional IT Services: Coding | Websites | Computer Tech