Ayuda Ficheros Acceso Directo

Sadako
28 de Enero del 2004
Buenas! Me piden crear un boton para ver el registro inmediatamente anterior al visto.
El boton para mostar el siguiente registro ya lo tengo hecho. El boton llama a la funcion Siguente()
Sub Siguiente()
dim total as string *62
if eof(1) then
msgbox " Fin de fichero"
else
get #1, ,total
form1!Text1.text = Mid (total, 1, 40)
form1!Text2.text = Mid (total, 41, 10)
fomr1!Text3.text= MId (total, 51, 12)
end if
end sub

Alguien me podria explicar como podria hacer para pasar al registro anterior?

en?
28 de Enero del 2004
hola, quizá podrias tener una variable que almacene la posicion del registro, asi que:

get #1 , , total podria ser get #1 , idPosicion, total
y de esta forma,
Si idPosicion > 1 Entonces get #1 , idPosicion - 1, total
para ver el registro inmediatamente anterior.

espero que sea eso, saludos