Zusätzliche Informationen: Der Index 0 ist negativ und unter der Gesamtanzahl _
  der Zeilen.

ds.ReadXml(Application.StartupPath & "\Adressbuch.xml")
 
            Dim dv As New DataView(ds.Tables("Adressbuch"))
 
 
            dv.RowFilter = "Name = 'Crivelli'"
            Dim handynr = dv.Item(0).Item("Handy")
            Label5.Text = handynr