'Zusammengesetzte Anfrage "query"
        Dim query As String = api_url + api_parameter
 
 
        Dim XMLDoc As Xml.XmlDocument = New Xml.XmlDocument
        XMLDoc.Load(query)
 
        gesuchter_wert = ???
 
        'Rückgabewert der Funktion get_xml_data
        get_xml_data = gesuchter_wert
 
 
    End Function

<ResultSet xsi:schemaLocation="uri" totalResultsAvailable="138" _
  totalResultsReturned="0">
</ResultSet>