app.path question

here is a portion of my code...how do I change the path I'm using to use APP.PATH......Very new at this...and thanks to everybody that helped with my other VB problems..this is the place to be.....Herman

DirOpen1 = "c:\program files\microsoft visual studio\vb98\vb6projects\fishlog2002\fishdata\fishtext\"


program folder is fishlog2002
fishdata subfolder has
fishtext
fishpics
fishsounds

What is the code for using app.path and the above

App.Path is a String to the Folder you are running the program from, so, if you are running the program from "C:\program files\microsoft visual studio\vb98\vb6projects\fishlog2002" then that is what App.Path will equal.

So, to get at one of the subfolders, you would use either:
DirOpen1 = (App.Path & "\fishdata\fishtext\")
DirOpen1 = (App.Path & "\fishdata\fishpics\")
DirOpen1 = (App.Path & "\fishdata\fishsounds\")

To the best of my knowledge, this should be correct.