《实习5 sql语言的应用》由会员分享,可在线阅读,更多相关《实习5 sql语言的应用(3页珍藏版)》请在金锄头文库上搜索。
1、实习实习 5-1 使用使用 SQL 语句创建表语句创建表“班级班级” 。操作步骤如下:1 在“命令”窗口中,依次输入如下命令并执行:Set default to e:myvfpModify project 河南工程学院.pjxOpen database 河南工程学院数据库create table 班级(班级编号 C(7) primary key, 班级名称 C(6) not null,专业名称 C(10),系编号 C(3)2 在“命令”窗口中,输入如下命令可查看创建的表“班级”:use e:myvfp班级.dbf exclusivebrowse last实习实习 5-2 根据已知的根据已知的“
2、学生表学生表” ,查询每位学生的姓名及出生年月。,查询每位学生的姓名及出生年月。操作步骤如下:1.打开数据库“河南工程学院数据库” ,在命令窗口输入如下命令:Use e:myvfp学生表.dbf exclusive2.在命令窗口中,输入并执行如下命令:Select 学号,姓名,出生年月 from 学生表结果如下:实习实习 5-3 根据根据“学生表学生表”查询男女学生的人数。查询男女学生的人数。操作步骤如下:1.打开数据库“河南工程学院数据库”2.在命令窗口输入并执行如下命令:Select count(学号) as 人数,性别 from 学生表 group by 性别实习实习 5-4 根据根据“
3、学生表学生表”和和“班级表班级表” ,查询每位学生所在班级。,查询每位学生所在班级。操作步骤如下:1.打开数据库“河南工程学院数据库”2.在命令窗口输入并执行如下命令:Select 学号,姓名,班级名称,专业名称 from 学生表 join 班级表 on 学生表.班级编号=班级表.班级编号实习 5-5 根据根据“学生表学生表”和和“班级表班级表” ,查询,查询“软件工程软件工程”专业的全体学生。专业的全体学生。1.打开数据库“河南工程学院数据库”2.在命令窗口输入并执行如下命令:Select 学号,姓名,性别,出生年月,籍贯,班级表.专业名称 from 学生表,班级表 where 学生表.班级
4、编号=班级表.班级编号 and 专业名称=“软件工程“Select 学号,姓名,性别,出生年月,籍贯,班级表.专业名称 from 学生表 where 专业名称 in (select 专业名称 from 班级表 where 专业名称=“软件工程“)实习期实习期 5-6 根据根据“学院表学院表” 、 “系表系表” 、 “班级表班级表” 、 “学生表学生表” ,查询每位学生所在学院、系和班级。,查询每位学生所在学院、系和班级。1.打开数据库“河南工程学院数据库”2.在命令窗口输入并执行如下命令:Select 学院名称,系名称,班级名称,学号,姓名 from 学院表 join 系表 on 学院表.学院
5、编号=系表.学院编号 join 班级表 on 系表.系编号=班级表.系编号 join 学生表 on 班级表.班级编号=学生表.班级编号实习实习 5-7 根据根据根据根据“学院表学院表” 、 “系表系表” 、 “班级表班级表” 、 “学生表学生表” ,统计,统计“J01”系全体男同学的人数。系全体男同学的人数。1.打开数据库“河南工程学院数据库”2.在命令窗口输入并执行如下命令:Select count(*) as J01 系人数 from 学生表 where 班级编号 like “J01%” and 性别=”男”习习 5-8 根据根据 “学生表学生表”,查询男生人数在查询男生人数在 3 人及人
6、及 3 人以上的班级。人以上的班级。1.打开数据库“河南工程学院数据库”2.在命令窗口输入并执行如下命令:select 班级编号 from 学生表 where 性别=“男“ group by 班级编号 having count(*)=3实习实习 5-9 根据根据 “学院表学院表” 、 “系表系表”,查询计算机学院院长的姓名和电话。查询计算机学院院长的姓名和电话。1.打开数据库“河南工程学院数据库”2.在命令窗口输入并执行如下命令:Select 学院名称,院长,电话,系名称,系主任,教研室个数 from 学院表 join 系表 on 学院表.学院编号=系表.学院编号统 where 学院名称=”计
7、算机”实习实习 5-10 根据根据 “学院表学院表” 、 “系表系表” 、 “班级表班级表” 、 “学生表学生表” ,查询计算机学院每位学生的信息。,查询计算机学院每位学生的信息。1.打开数据库“河南工程学院数据库”2.在命令窗口输入并执行如下命令:select 学院名称,系名称,班级名称,学号,姓名 from 学院表 join 系表 on 学院表.学院编号=系表.学院编号 join 班级表 on 系表.系编号=班级表.系编号 join 学生表 on 班级表.班级编号=学生表.班级编号 where 学院名称=“计算机“登录代码:locate for alltrim(用户表.用户名)=alltr
8、im(thisform.text1.value)if found() and alltrim(用户表.密码)=alltrim(thisform.text2.value)do form 关于.scxrelease thisformelse=messagebox(“用户名或密码错误请重新输入!“48,“警告“)thisform.text2.setfocusendif摸奖机代码:do casecase left(thisform.text1.value,1)=“1“thisform.edit1.value=“您的奖品是 10 元!“ case left(thisform.text1.value,1)
9、=“2“thisform.edit1.value=“您的奖品是 100 元!“ case left(thisform.text1.value,1)=“3“thisform.edit1.value=“您的奖品是 500 元!“case left(thisform.text1.value,1)=“4“thisform.edit1.value=“您的奖品是 10000 元!“otherwisethisform.edit1.value=“谢谢您的参与!“endcase水仙花数代码:clearfor i=100 to 999a=val(left(str(i,3),1)b=val(substr(str(i
10、,3),2,1)c=val(right(str(i,3),1)if i=a3+b3+c3thisform.edit1.value=thisform.edit1.value+str(i,5)+chr(13)endifendforreturn求阶乘和:*求 1!2!99!= clear s=1 t=1 for i=3 to 99 step 2 t=t*i*(i-1) s=s+t endfor ?1!+2!+3!+99!=?s Return追加记录:thisform.txt 学号.value=“ “thisform.txt 课程编号.value=“ “thisform.txt 成绩.value=0t
11、hisform.txt 学号.setfocusselect 成绩表dime x(3)x(1)=thisform.txt 学号.valuex(2)=thisform.txt 课程编号.valuex(3)=thisform.txt 成绩.valueinsert into 成绩表(学号,课程编号,成绩) value (x(1),x(2),x(3)求素数:*求 3-100 之间的素数 clear for n=3 to 100 step 2 for i=2 to n/2 if mod(n,i)=0 exitendif endforif in/2 ?i endif endfor return学生平均分查询
12、:select avg(成绩) from 成绩表 group by 课程编号 having程序 1:?“查看每位学生的专业“select 学号,姓名,性别,出生年月,专业名称 from 学生表 join 班级表 on 班级表.班级编号=学生表.班级编号return 程序 2:?“查看每位学生的年龄“select 学号,姓名,性别,出生年月,year(date()-year(出生年月) as 年龄 from 学生表return 程序 3:?“查看每位班长的相关信息“select 学号,姓名,性别,出生年月 from 学生表 join 班级表 on 班级表.班长姓名=学生表.姓名return 程序 4:?“查看男、女生人数“select 性别,count(*) as 人数 from 学生表 group by 性别return