人妖能生孩子吗:在VFP编程中怎么实现点击“首记录”按扭转到首记录

来源:百度文库 编辑:中科新闻网 时间:2024/05/03 10:35:37
问题是这样的我用一个按扭组来控制一个表单记录的显示情况,其实是一种很简单的功能,其他的三个按扭我都实现了,不过就是这个首记录按扭不能定位到,我想应该是我开始用了个排序语句“set order to 编号” 不知道是不是那里出了差错,希望你可以帮我解答!!

你用了Set order to指定了排列顺序,这样go 1就可能不是在首位记录
习惯,并且通用的做法是go top
到尾部用go bott,下面是很早以前的一个定位程序,供你参考
*
* 程序名称: Goto.PRG
* 功 能: 数据库记录定位.
*

Private tp,Skp

Push key clear
define windows Goto title '[记录定位]' From 15,2 to 20,76;
Shadow Color Scheme 5
activate windows Goto
@1,2 Get tp Picture'@*h \<1.首(Top);\<2.尾(Bottom);\<3.指定(Goto);\<4.翻越(Skip);\?\<0.Cancel' default 1
read Cycle
clear

do Case
Case recc()=0
Case tp=1
Go top
Case tp=2
Go bottom
Case tp=3
@1,20 Say'记录号(Goto)?' Get Skp default recn() range 1,recc()
read
Go Skp
Case tp=4
@1,20 Say'翻越记录(Skip)?' Get Skp default 0
read
Skip Skp
endCase

release windows Goto
pop key

Return

只要输入 先go top 或go 1,定位就到了首记录。然后再显示就行了