是不是想实现 移动指针上一条、下一条记录???(我前面有个是说错了的)
当前记录一开始是在第一条的.
当Thisform.text1.ControlSource="表名.字段1"
select 表名
if thisform.text1.value==dmmin
messagebox("已到数据首部",48,"移动记录")
else
skip 1
endif
thisform.refresh
当前记录一开始是在第一条的.
当Thisform.text1.ControlSource="表名.字段1"
select 表名
if thisform.text1.value==dmmin
messagebox("已到数据首部",48,"移动记录")
else
skip 1
endif
thisform.refresh
[glow=150,blue,2] 该珍惜的,好好把握;该舍去的,不再留恋; 该执著的,永不怨悔;该面对的,绝不逃避。[/glow]