Public Class Form1
 
   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As _
     System.EventArgs) Handles Button1.Click
      'Folgendes in einem Button
      Dim i As Integer
      Dim objDateien() As System.IO.FileInfo
 
      'Das einzelne EintragObjekt
      Dim ltvItem As New ListViewItem
 
      ListView1.Items.Clear()
      objDateien = New IO.DirectoryInfo("C:\").GetFiles()
      For i = 0 To objDateien.GetUpperBound(0)
         ltvItem = ListView1.Items.Add(objDateien(i).ToString)
         ltvItem.Tag = objDateien(i).FullName
      Next
   End Sub
End Class

Visual Basic Express 2010, C# Express 2010
Intel? i7 Core 920@2.63 Ghz, 6 GByte DDR3, 1024 MB ATI? Radeon? 5870, Windows 7 Prof. 64 Bit
Gibson SG 61' Reissue ; Ibanez Prestige RG 2550 E, Marshall Valvestate VS100 + Modell Vs412 (4 x 12''), Cubase Studio