关于vfp的表单设计问题,想设计一表单,上面有两个text控件,一个查询命令按钮,一个表格(学号课程号成绩
答案:2 悬赏:40 手机版
解决时间 2021-02-12 23:21
- 提问者网友:呐年旧曙光
- 2021-02-12 20:12
要求是在text1输入一个学号,按查询命令按钮后表格里自动筛选出该学号的所有课程号的成绩,比如查询学号00001的学生,表格里会筛选出00001(学号),A(课程号),80(成绩);00001,B(课程号),90(成绩)这两行数据,并且text2会显示该学号所有成绩的平均分,请问要如何编写代码呢? (放不了图片,只能文字表述,请各位见谅:))
最佳答案
- 五星知识达人网友:低血压的长颈鹿
- 2021-02-12 20:18
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
全部回答
- 1楼网友:执傲
- 2021-02-12 21:44
你的表格控件跟表是绑定的,所以一运行表单,数据库已经打开了,你再一use,等于重新打开一次表,你把use qiandao 改成sele qiandao
或者在click事件里加一条
thisform.表格控件名.recordsource="qiandao" **重新指定表格控件的数据源
不能存取文件应该是你已经打开[月末查看.xls]这个文件了,应该给的提示是文件已经存在是否改写,不过你可以用set safe off 把这个提示关掉
14-mar-10这个显示是xls里的问题,可以通过设置单元格格式修改显示方式
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯