dim Re as recordset
dim rs1 as recordset
re.movelast ‘移动到数据表的最后
re.movefirst ‘移动到数据表的最前
re.movenext ‘移动到数据表的下一条记录
rs1.Move n 向后移n条，若n为负数，则向前移
rs1.MoveFirst 移到第一条
rs1.MovePrevious 移到上一条
rs1.MoveNext 移到下一条
rs1.MoveLast 移到最后一条
原文：http://www.cnblogs.com/gyc19920704/p/5382939.html