For x = 0 To (Liste1.Count - 1) Step 1
                hole dir ip adresse vom eintrag x in liste eins
                For y = 0 To (Liste2.Count - 1) Step 1
                    hole dir ip adresse vom eintrag y in liste zwei
                    if ipadresse von der x liste = der der yliste then 
                    mache etwas
                    exit for
                    end if
                Next
            Next

 Public dnseinträge As New List(rechner)
 
Public Class rechner
 
        Implements IComparer(Of rechner)
 
 
        Public dnsname As String
        Public ip As String
        Public id As Integer
        Public veraendert As Date
        Public info As String
        Public ersteintrag As Date
        Public altdnsname As String
        Public altip As String
        Public altveraendert As Date
        Public altinfo As String
        Public flag As Char
        Public manuell As Char
 
        Public Function ausgabe() As String
            Return id.ToString & " " & dnsname & " " & ip & " " & flag
        End Function
 
        Public Function Compare(ByVal x As rechner, ByVal y As rechner) As _
          Integer Implements System.Collections.Generic.IComparer(Of _
          rechner).Compare
 
        End Function
    End Class