ma se è solo per quello usa exit do!!!!

do until rs.eof
if condizione then
exit do
else
rs.movenext
end if
loop