Do While Not rs.EOF

Jeg har et problem med denne kode:

Do While Not rs.EOF           
    If aktiv = "False" Then
        'Bla
    Else
        If bla = bla2 Then
            'bla
        ElseIf bla3 < bla4 Then
            'bla
        Else
            '***DENNE***
        End If
    End If
    rs.movenext
loop

Lad os antage at mit recordsæt udtager 10 værdier. Så vil overstående kode jo udskrive den tekst jeg har der hvor jeg har skrevet ***DENNE*** 10 gange. Jeg skal have den til kun at udskrive den til sidste hvis ikke nogen af de andre er opfyldt med de andre værdier fra recordsættet.