Public Structure Kontakt
        Dim Name As String
        Dim Vorname As String
        Dim PLZ As String
        Dim Ort As String
        Dim Straße As String
        Dim Email As String
        Dim Tel As String
    End Structure
    Public kontakte() As List(Of Kontakt)