ado+access+datagrid如何在按钮实现上一条和下一条？

Question

ado+access+datagrid如何实现上一条和下一条，显示在文本框中。连接数据库的代码是放在模块中的。然后在窗体中“下一条”按钮的事件中写
sql="select * from table"
dim mrc as adodb.recordset
set mrc=exesql(sql)
mrc.movenext
这样做下来好象不行我该如何修改他呢？另一种方案：
在“下一条”按钮的事件中写
mrc.MoveNext
If mrc.EOF Then mrc.MoveLas
text1.text = mrc("A")有提示！找不到WITH变量！或未定义！

Answer 1

mrc.MoveLas ????????
mrc.MoveLast

Answer 2

while(mrc.eof<>true)
   mrc.movenext
   datagrid.datasouce=mrc
wend