Public Class myClass
   Private pDataCollection As System.ComponentModel.BindingList(Of myData)
 
   Public Sub LoadData()
      pDataCollection = New System.ComponentModel.BindingList(Of myData)
 
      For Each fi As IO.FileInfo In New IO.DirectoryInfo( _
        Environment.GetEnvironmentVariable("TEMP")).GetFiles
         pDataCollection.Add(New myData(fi))
      Next
   End Sub
 
   Public ReadOnly Property DataCollection() As _
     System.ComponentModel.BindingList(Of myData)
      Get
         Return pDataCollection
      End Get
   End Property
End Class