Hola,
eso es lógico, ya que estás mostrando los datos del control Data sin mover el puntero, por lo que siempre mostrará el primer registro que cumpla la condición.
De todas formas, hay algunas cosas que no entiendo en ese código:
¿Porqué en el evento KeyPress de "rut_per" (que supongo será un TextBox) y no en el evento Change?
¿Porqué en vez de un bucle y una condición, no haces directamente una consulta con LIKE?, ahorrarías código y recursos.
Y otra cosa, los dos Data1.Refresh sobran, eso lo único que hace es perder tiempo.
