PC Pro: Our first Windows Store app

<Grid Background="{StaticResource ApplicationPageBackgroundBrush}">
<Grid Grid.Row="1">
<!-- Left column -->
<ListView x:Name="ItemListView" ItemsSource="{Binding Items}" SelectionChanged="ItemListView_SelectionChanged">
<ListView.ItemTemplate>
<DataTemplate>
<StackPanel>
<TextBlock Text="{Binding Title}" />
<TextBlock Text="{Binding Author}" />
<TextBlock Text="{Binding PubDate}"/>
</StackPanel>
</DataTemplate>
</ListView.ItemTemplate>
</ListView>
<!-- Right column -->
<Grid DataContext="{BindingElementName=ItemListView, Path=SelectedItem}" Grid.Column="1"/>
<TextBlock x:Name="PostTitleText" Text="{Binding Title}" />
<WebView x:Name="ContentView" Grid.Row="1" />
</Grid>
</Grid>
<TextBlock Text="PC Pro RSS Reader"/>
</Grid>

' --------------------------------------------------------------------------------

Protected Overrides Async Sub OnNavigatedTo(e As Navigation.NavigationEventArgs)
Dim _feedDataSource As FeedDataSource = App.DataSource
If _feedDataSource.Feeds.Count = 0
   Then
   Await _feedDataSource.GetFeedsAsync()
End If
Me.DataContext = (_feedDataSource.Feeds).First()
End Sub

' --------------------------------------------------------------------------------

Private Sub ItemListView_SelectionChanged(sender As Object, e As SelectionChangedEventArgs)
Dim _feedItem As FeedItem = e.AddedItems(0)
If _feedItem IsNot Nothing
   Then
   ContentView.NavigateToString(_feedItem.Content)
End If
End Sub