用VF做了一个表单查询,放了两个命令按钮,分别使它们为上一条,下一条的代码怎么写?
展开全部
我也正在做这样子的一个系统,我的是上一条的是:
select 学生表
skip-1
if bof()
this.enabled=.f.
thisform.commandgroup1.command1.enabled=.f.
endif
thisform.commandgroup1.command3.enabled=.t.
thisform.commandgroup1.command4.enabled=.t.
thisform.text1.value=学生表.学号
thisform.text2.value=学生表.姓名
thisform.text3.value=学生表.性别
thisform.text4.value=学生表.班级
thisform.text5.value=学生表.出生日期
thisform.refresh
下一条的是:
select 学生表
skip
if eof()
this.enabled=.f.
thisform.commandgroup1.command4.enabled=.f.
endif
thisform.commandgroup1.command1.enabled=.t.
thisform.commandgroup1.command2.enabled=.t.
thisform.text1.value=学生表.学号
thisform.text2.value=学生表.姓名
thisform.text3.value=学生表.性别
thisform.text4.value=学生表.班级
thisform.text5.value=学生表.出生日期
thisform.refresh
希望对你有帮助
select 学生表
skip-1
if bof()
this.enabled=.f.
thisform.commandgroup1.command1.enabled=.f.
endif
thisform.commandgroup1.command3.enabled=.t.
thisform.commandgroup1.command4.enabled=.t.
thisform.text1.value=学生表.学号
thisform.text2.value=学生表.姓名
thisform.text3.value=学生表.性别
thisform.text4.value=学生表.班级
thisform.text5.value=学生表.出生日期
thisform.refresh
下一条的是:
select 学生表
skip
if eof()
this.enabled=.f.
thisform.commandgroup1.command4.enabled=.f.
endif
thisform.commandgroup1.command1.enabled=.t.
thisform.commandgroup1.command2.enabled=.t.
thisform.text1.value=学生表.学号
thisform.text2.value=学生表.姓名
thisform.text3.value=学生表.性别
thisform.text4.value=学生表.班级
thisform.text5.value=学生表.出生日期
thisform.refresh
希望对你有帮助
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询