Windows Phone and XML Parser

Imports System.Runtime.Serialization
Imports System.Collections.ObjectModel
Imports System.IO
Imports System.Text
Imports System.Xml.Linq

Partial Public Class MainPage
    Inherits PhoneApplicationPage

    ' Constructor
    Public Sub New()
        InitializeComponent()

        AddHandler Loaded, AddressOf MainPage_Loaded

    End Sub

    Private Sub MainPage_Loaded(sender As Object, e As System.Windows.RoutedEventArgs)
        Dim myCustomer As New List(Of Customer)
        Dim loadData As XDocument = XDocument.Load("XML/myXML.xml")

        Dim data = From query In loadData.Descendants("customer")
                    Select New Customer With { _
                        .CustomerID = query.Element("CustomerID"), _
                        .Name = query.Element("Name"), _
                        .Email = query.Element("Email"), _
                        .CountryCode = query.Element("CountryCode"), _
                        .Budget = query.Element("Budget"), _
                        .Used = query.Element("Used")
                    }

        Me.CustomerList.ItemsSource = data

    End Sub

  

    <DataContract()> _
    Public Class Customer

        Sub New()
            ' TODO: Complete member initialization 
        End Sub

        <DataMember()> _
        Public Property CustomerID() As String
            Get
                Return m_CustomerID
            End Get
            Set(value As String)
                m_CustomerID = value
            End Set
        End Property
        <DataMember()> _
        Public Property Name() As String
            Get
                Return m_Name
            End Get
            Set(value As String)
                m_Name = value
            End Set
        End Property
        <DataMember()> _
        Public Property Email() As String
            Get
                Return m_Email
            End Get
            Set(value As String)
                m_Email = value
            End Set
        End Property
        <DataMember()> _
        Public Property CountryCode() As String
            Get
                Return m_CountryCode
            End Get
            Set(value As String)
                m_CountryCode = value
            End Set
        End Property
        <DataMember()> _
        Public Property Budget() As String
            Get
                Return m_Budget
            End Get
            Set(value As String)
                m_Budget = value
            End Set
        End Property
        <DataMember()> _
        Public Property Used() As String
            Get
                Return m_Used
            End Get
            Set(value As String)
                m_Used = value
            End Set
        End Property

        Private m_CustomerID As String
        Private m_Name As String
        Private m_Email As String
        Private m_CountryCode As String
        Private m_Budget As String
        Private m_Used As String

        Public Sub New(ByVal strCustomerID As String,
                       ByVal strName As String,
                       ByVal strEmail As String,
                       ByVal strCountryCode As String,
                       ByVal strBudget As String,
                       ByVal strUsed As String)
            Me.CustomerID = strCustomerID
            Me.Name = strName
            Me.Email = strEmail
            Me.CountryCode = strCountryCode
            Me.Budget = strBudget
            Me.Used = strUsed

        End Sub

    End Class


End Class

using System;
using System.Windows;
using Microsoft.Phone.Controls;
using System.Collections.Generic;
using System.Collections.ObjectModel;
using System.IO;
using System.Text;
using System.Xml;
using System.Xml.Linq;
using System.Linq;

namespace PhoneApp
{
    public partial class MainPage : PhoneApplicationPage
    {

        // Constructor
        public MainPage()
        {
            InitializeComponent();

            Loaded += MainPage_Loaded;
        }

        private void MainPage_Loaded(object sender, System.Windows.RoutedEventArgs e)
        {
            List<Customer> myCustomer = new List<Customer>();
            XDocument loadData = XDocument.Load("XML/myXML.xml");

            var data = from query in loadData.Descendants("customer")
                       select new Customer ()
                       {
                           CustomerID = (string)query.Element("CustomerID"),
                           Name = (string)query.Element("Name"),
                           Email = (string)query.Element("Email"),
                           CountryCode = (string)query.Element("CountryCode"),
                           Budget = (string)query.Element("Budget"),
                           Used = (string)query.Element("Used")
                       };

            this.CustomerList.ItemsSource = data;
        }

    }

    public class Customer
    {
        public string CustomerID { get; set; }

        public string Name { get; set; }

        public string Email { get; set; }

        public string CountryCode { get; set; }

        public string Budget { get; set; }

        public string Used { get; set; }

    }
}