关于vfp的表单设计问题,想设计一表单,上面有两个text控件,一个查询命令按钮,一个表格(学号课程号成绩 20
要求是在text1输入一个学号,按查询命令按钮后表格里自动筛选出该学号的所有课程号的成绩,比如查询学号00001的学生,表格里会筛选出00001(学号),A(课程号),8...
要求是在text1输入一个学号,按查询命令按钮后表格里自动筛选出该学号的所有课程号的成绩,比如查询学号00001的学生,表格里会筛选出00001(学号),A(课程号),80(成绩);00001,B(课程号),90(成绩)这两行数据,并且text2会显示该学号所有成绩的平均分,请问要如何编写代码呢? (放不了图片,只能文字表述,请各位见谅:))
展开
1个回答
展开全部
sele 成绩表
t1=alltrim(thisform.text1.value)
loca for 学号=t1
if found()
sele 学号,课程号,成绩 from 成绩表 where 学号=t1 into cursor "temp"
sele avg(成绩) from temp into array abc
thisform.grid1.recordsource="temp"
thisform.text2.value=abc
else
messagebox("查无此人!",64,"提示")
thisform.text1.setfocus
endif
t1=alltrim(thisform.text1.value)
loca for 学号=t1
if found()
sele 学号,课程号,成绩 from 成绩表 where 学号=t1 into cursor "temp"
sele avg(成绩) from temp into array abc
thisform.grid1.recordsource="temp"
thisform.text2.value=abc
else
messagebox("查无此人!",64,"提示")
thisform.text1.setfocus
endif
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询