Dim xel As XElement = <event>
                                  <name>TEXT1</name>
                                  <address>TEXT2</address>
                                  <message>TEXT3</message>
                              </event>
        Dim name As String = xel.<name>.Value

        xel = XElement.Load(stream)
        Dim address As String = xel.<address>.Value

________
Alle Angaben ohne Gewähr. Keine Haftung für Vorschläge, Tipps oder sonstige Hilfe, falls es schiefgeht, nur Zeit verschwendet oder man sonst nicht zufrieden ist