Dim But1 As Button
    Dim But2 As Button
    Dim B1 As Boolean
 
        Dim Rou As Object
        Rou = Application.StartupPath
 
 
        If But1.Image Is Rou + "\" + "2.jpg" Or Rou + "\" + "7.jpg" Then
            If But2.Image Is Rou + "\" + "2.jpg" Or Rou + "\" + "7.jpg" Then
                B1 = True
            End If
        End If

C:\Dokumente und Einstellungen\Quincy\Desktop\klick\bin\2.jpg

Schreibe von einem ab, dann ist das Plagiat - schreibe von zweien ab, dann ist das Forschung!