title: Error with adding custom data source
body: <p>Currently in the middle of completing this little app I'm making and I've come across this little error. I've currently made my own Listbox data template and I have binded them but i get an error saying that there is an invalid cast exception. 
  My binded Listbox template is:</p>
  
  
  
  <pre><code>&lt;DataTemplate x:Key="DataTemplate1"&gt;
      &lt;Grid Height="59" Width="306"&gt;
          &lt;TextBlock x:Name="Name" HorizontalAlignment="Left" Height="29" TextWrapping="Wrap" Text="{Binding Name}" VerticalAlignment="Top" Width="306"/&gt;
          &lt;TextBlock x:Name="Message" HorizontalAlignment="Left" Height="29" TextWrapping="Wrap" Text="TextBlock" VerticalAlignment="Top" Width="306" Margin="0,29,0,0"/&gt;
      &lt;/Grid&gt;
  &lt;/DataTemplate&gt;
  </code></pre>
  
  <p>The vb code is:</p>
  
  <pre><code>Dim myStore As IsolatedStorageFile = IsolatedStorageFile.GetUserStoreForApplication()
      Dim directory As String = "./PENCIL/Notes/*.*"
      Dim filenames As String() = Storage.GetFileNames(directory)
      Dim dataSource As New List(Of SampleData1)()
      dataSource.Add(New SampleData1() With {.Name = filenames(directory)})
      ItemsList.ItemsSource = dataSource
  </code></pre>
  
  <p>This is basically supposed to load the files into the listbox.</p>
  
  <p>And my SampleData1 is:</p>
  
  <pre><code> Public Class SampleData1
      Private _name As String
      Public Property Name() As String
          Get
              Return _name
          End Get
          Set(value As String)
              _name = value
          End Set
      End Property
  End Class
  </code></pre>
  
  <p>I keep getting the error at this: </p>
  
  <pre><code>dataSource.Add(New SampleData1() With {.Name = filenames(directory)})
  </code></pre>
  
  <p>Look at the picture for a better preview of the error i keep getting:
  <a href="http://puu.sh/5VGgj.png" rel="nofollow">http://puu.sh/5VGgj.png</a></p>
  
  <p>is anybody able to help?
  Thanks!</p>