FileListBox Populating 1

[Bubbler]

I have a FileListBox and it is populated via a folder full of shortcuts (.lnk)
How can I make the FileListBox react so that when one of the shortcuts is clicked on in the FileListBox it opens the program that the shortcut is pionting to?

Private Sub File1_Click()

'Go to Program

End Sub

Private Sub Form_Load()

File1.Path = "C:\Program Files\app"

End Sub

 

[DrJavaJoe]

Private Sub File1_Click()
MsgBox File1.Path & "\" & File1.List(File1.ListIndex)
End Sub

Will return the path and file clicked then just use ShellExecute to launch.

 

[Bubbler]

Thx DrJavaJoe, that's what I needed!