.RecordSourceType=1 Thisform.Grid1.RecordSource="temp" CASE Thisform.Optiongroup1.Value=2 SELECT 数量.,外币名称,持有数量; FROM 数量,汇率; WHERE 汇率.外币代码=数量.外币代码; INTO CURSOR temp Thisform.Grid1.RecordSourceType=1 Thisform.Grid1.RecordSource="temp" CASE Thisform.Optiongroup1.Value=3 SELECT ,SUM(持有数量*基准价)AS 总资产; FROM 汇率,数量; WHERE 汇率.外币代码=数量.外币代码; GROUP BY ; INTO CURSOR temp Thisform.Grid1.RecordSourceType=1 Thisform.Grid1.RecordSource="temp" ENDCASE 题目:对公司管理数据库中的表"员工"和"部门",建立文件名为"表单"的表单,标题为" 公司管理",表单上有1个表格控件和3个命令按钮,标题分别为"按部门查看", "人数统计"和" 退出". 当表单运行时: ①单击"按部门查看"按钮,以"部门号"排序查询员工表中的记录,结果在表格控件中显 示. ②单击"人数
统计"按钮,查询职工表中今年的各部门的人数,结果中含"部门号码"和"今 年人数"等字段,结果在表格控件中显示. ③单击"退出"按钮关闭表单.
按部门查看代码:THISFORM.grid1.RecordSource="; SELECT * FROM 员工; ORDER BY 部门号; INTO CURSOR temp" 人数统计代码:THISFORM.grid1.RecordSource="; SELECT 员工.部门号,COUNT(部门号) AS 今年人数; FROM 员工; GROUP BY 部门号; INTO CURSOR temp" "成绩管理"数据库中有3个数据库表"学生信息","成绩信息"和"课程信息".建立文件 名为my,标题为"成绩查询"的表单,表单包含3个命令按钮,标题分别为"查询最高分","查询 最低分"和"关闭". 单击"查询最高分"按钮时,调用SQL语句查询出每门课的最高分,查询结果中包含" ","课程名"和"最高分"三个字段,结果在表格中显示. 单击"查询最低分"按钮时,调用SQL语句查询出每门课的最低分,查询结果中包含" ","课程名"和"最低分"三个字段,结果在表格中显示. 单击"关闭"按钮时关闭表单.
查询最高分:SELECT ,课程名称,MAX(成绩) AS 最高分; FROM 课程信息,成绩信息,学生信息; WHERE 课程信息.课程号=成绩信息.课程号; AND 学生信息.=成绩信息.; GROUP BY 课程信息.课程号 查询最低分:SELECT ,课程名称,MIN(成绩) AS 最低分; FROM 课程信息,成绩信息,学生信息; WHERE 课程信息.课程号=成绩信息.课程号; AND 学生信息.=成绩信息.; GROUP BY 课程信息.课程号 题目:score_manager数据库中含有3个数据库表student,score1和course.为了对 score_manager数据库数据进行查询,
设计一个如图所示的表单myform1(控件名为form1, 表单文件名myform1.scx).表单的标题为"成绩查询".表单左侧有文本"输入(名称为 Label1的标签)"和用于输入的文本框(名称为Text1),"查询"(名称为Command1)和 "退出"(名称为Command2)两个命令按钮以及1个表格控件. 表单运行时,用户首先在文本框中输入,然后单击"查询"按钮,如果输入正确, 在表单右侧以表格(名称为Grid1)形式显示该生所选课程名和成绩,否则提示"不存在, 请重新输入". 单击"退出"按钮,关闭表单.
查询代码:GO TOP LOCATE FOR Student. ==ALLTRIM(THISFORM.TEXT1.VALUE) IF Stude