求VF制作的学生成绩查询系统 好的200分
成品,代码,详细制作思路都行,根据质量+分!
有的发我油箱里 125523861@qq.com
没有人么 - - 给个思路什么就行，100分都没人要么 展开
你有没有VF的教材？如果有的话，那上面应该有你想要的。
我给你介绍一个吧。
假如有学生表student和成绩表grade，表的结构如下：
student(学号（C，8），姓名（C，6），性别（L），出生日期（D））
grade（学号（C，8），课程号（C，3），成绩（N，5，1））
然后设计一个进行查询成绩的表单，如图
当输入学生姓名并单击“查询成绩”按钮时，会在右边的表格内显示该同学所选各课的成绩，并在左边相应的文本框内显示其中的最高分、最低分以及平均分。单击“退出”按钮时将关闭表单。
1、在命令窗口输入命令：CREATE FORM 成绩查询， 打开表单设计器窗口。
2、打开数据环境设计器窗口，向数据环境添加表student和表grade。（当然，前提是你有这两张表）
3、在表单上添加各文本框、命令按钮、表格及相关的标签，并进行适当的布置和大小调整。
4、设置各标签、命令按钮以及表单的Caption属性值。
5、将表格的ColumnCount属性值设置为2（共两列）、RecordSourceType属性值设置为“4--SQL说明”
6、将表格内两列标头的Caption属性分别设置为“课程号”和“成绩”，并适当调整两列的宽度。
7、设置“查询成绩”按钮的Click事件代码：
Thisform.Grid1.RecordSource = "select 课程号,成绩 FROM student,grade WHERE student.学号 = grade.学号 AND 姓名 ALLTRIM(Thisform.Text1.Value) INTO CURSOR lsb"
SELECT MAX(成绩) AS maxcj,MIN(成绩) AS mincj,AVG(成绩) AS avgcj FORM lsb INTO CURSOR lsb1
SELECT lsb1
GO TOP
Thisform.Text2.Value = maxcj
Thisform.Text3.Value = mincj
Thisform.Text4.Value = avgcj
8、设置”退出“按钮的Click事件代码：
Thisform.Release
9、保存表单，关闭表单设计器窗口。
东澳
2024-06-07 广告
