[stefanra]

Dann würde die Umsetzung so aussehen. Btw. nicht vergessen, System.Xml zu inkludieren.

Function ReadArgs()
        Dim reader As XmlNodeReader
        Try
            Dim doc As New XmlDocument
            doc.Load("") 'Pfad zur XML-Datei hier einfuegen
            reader = New XmlNodeReader(doc)
            While reader.Read
                Select Case reader.NodeType
                    Case XmlNodeType.Element
                        If reader.Name = "Arg" Then
                            If reader.GetAttribute("name") = "version" Then
                                Me.lblversion.Text = reader.GetAttribute("value")
                            ElseIf reader.GetAttribute("name") = "datum" Then
                                Me.lbldatum.Text = reader.GetAttribute("value")
                            Elseif reader.GetAttribute("name") = "reason" Then
                                Me.lblreason.Text = reader.GetAttribute("value")
                            End If
                        End If
                End Select
            End While
        Catch ex As Exception
        Finally
            If Not (reader Is Nothing) Then
                reader.Close()
            End If
        End Try
    End Function

Den innersten Abfrageteil, der hier mit if-Abfragen gemacht wird, kann natürlich auch und wohl besser mit Select gemacht werden.