Imports System.IO 'Am Anfang
 
'Folgendes in einem Button
Dim i As Integer
Dim objDateien() As System.IO.FileInfo
 
'Das einzelne EintragObjekt
Dim ltvItem as New ListViewItem 
 
lst_datei.Items.Clear()
objDateien = New DirectoryInfo("E:dateien").GetFiles()
For i = 0 To objDateien.GetUpperBound(0)
ltvItem  = lst_datei.Items.Add(objDateien(i).ToString)
ltvItem.Tag = objDateien.FullPath
Next

Dim pfad as String 
 
'Daten aus dem Tag auslesen und in einem String umkonvertieren
pfad = CType(lst_datei.FocusedItem.Tag,String)
 
'Entsprechende Datei starten:
Process.Start(pfad)