Visual Basic - moverme hacia delante o atras en la tabla vb6 acce

Tengo una tabla de inventarios, con muchos registros, y tengo un formulario donde el usuario, digita en un texbox
el codigo de inventario que necesita ver, y yo lo busco, con esta instruccion y lleno el formulario, de todos los datos
y funciona bien.

Dim sql As String
sql$ = "SELECT * FROM inv_Maestro WHERE CIA = '" & mvCia & "' AND DIVISION = '" & mvDivision & "'"
sql$ = sql$ & " WHERE CIA = '" & mvCia & "' AND DIVISION = '" & mvDivision & "' "
sql$ = sql$ & " AND CodigoInv = '" & Trim(TxtCodigo.Text) & "'"
Set rs0 = New ADODB.Recordset
rs0.Open sql, Cnn, adOpenStatic, adLockReadOnly

La pregunta es esta,
Puse en ese mismo Formualrio 2 botones, uno con una flechita para arriba, y otro con la
flechita para abajo, como puedo hacer la instruccion del sql , donde si el usuario digita los botones ya sea las flechitas
para arriba o abajo, yo moverme al siguiente codigo, o al codigo anterior a partir del codigo de donde se encuentra
en ese momento el usuario ?

Los codigos del inventario, no son numeros consecutivos, o sea que el codigo que sigue en la tabla , no es el anterior
mas 1 ni tampoco el anterior menos 1 , ejemplo abajo.

codigo
01010001
01010002
01010003
01010010
01010020
01020001
01020003
01020014
02020021
03010001
03010002

Saludes,


josé