Sortering af dataset indlæst fra xml fil

Jeg har downloadet kalenderen fra WROX hjemmeside, den fungerer fint, problemet er bare at når man går ind i editfunktionen på kalenderen for at rette i oprettede aftaler, så står aftalerne ikke i sorteret rækkefølge, dvs efter dato, men i stedet i den rækkefølge de står listet i xml filen. Hvordan får jeg aftalerne præsenteret efter dato. I xml filen står datoen som  <EventDate>01-12-2003</EventDate>

Her koden som generer oprettede aftaler.

Sub Page_Load(Sender As Object, E As EventArgs)

  If Not Page.IsPostBack Then
    EventData.DataSource = LoadMyCalendarData
    EventData.DataBind()
  End If

End Sub


Protected Function LoadMyCalendarData() As DataSet

  Dim sourceXML as String = Server.MapPath("MyCalendar.xml")
    If ( Not File.Exists ( sourceXML ) ) Then
      Return Nothing
    End if

  Dim cachedDataSet as DataSet = Session("MyCalendarData")
    If ( Not cachedDataSet Is Nothing ) Then
      Return cachedDataSet
    End if
  Dim dataSet As DataSet = New DataSet()

  Try
    dataSet.ReadXml(sourceXML)

    Session("MyCalendarData") = dataSet

  Catch e As Exception
    ErrorMessage.Text = e.Message
    dataSet = Nothing
  End Try

  Return dataSet

End Function