1、Updata 学生Set 系编号# = 002Where 姓名=“张三”and 系编号#=001(5) 统计学生总人数。Select count (学号#)From 学生(6) 显示计算机系的学生的信息。Select *From 教师,任课,课程Wher 课程名=”数据库原理” and 课程.课程编号# = 任课.课程编号# and 任课.教师编号# = 教师.教师编号#(7) 查找法律系的系办电话。Select 系办电话From 院系Where 系名= “法律系”(8) 删除2000级的学生记录。Delete from 学生Where 年级= “2000级”(9) 将计算机系教师张明的职称升
2、为教授。Updata 教师Set 职称= “教授”Where 姓名= ”张明” and 教师编号# = ( select 教师编号#Where 系名= “计算机系”)(10) 统计计算机系教师张明的任课门数。Select count (课程编号#)From 院系,教师,任课Where 院系.系名= “计算机系” and 院系.系编号# = 教师.系编号# and 教师.教师编号# = 任课.教师编号#(11) 统计每个系的教师的人数。Select 系编号#, count (教师编号#)From 教师Group by 系编号#(12) 查找教授数据库原理的教师的姓名。Select 教师.姓名Wh
3、ere 课程名= “数据库原理” and 课程.课程编号# = 任课.课程编号# and 任课.教师编号# = 教师.教师编号#(13) 删除1020号教师的任课记录。Delete from 任课Where 教师编号# = “1020”(14) 将课程数据库原理的学分设为4.Updata 课程Set 学分 = 4Where 课程名= 数据库原理(15) 学生王明每选一个学分交费100元,统计它的选课总费用。Select sum (学分)* 100From 学生,课程,选课Where 学生.学号# = 选课.学号# and 选课.课程编号 = 课程.课程编号#(16) 统计20岁的学生总人数。S
4、elect count (age)Where 学生.年龄 = 20(17) 选修数据库原理的学生名单secect 学生.姓名from 学生,课程,选课where 课程.课程名 = “ 数据库原理” and 课程.课程编号# = 选课.课程编号# and 选课.学号# = 学生.学号#(18) 删除20030号学生的选课记录delete from 选课where 学号# = “200030”(19) 建立一个存储过程,通过输入学号,显示学生的姓名,选课课程名,成绩,并统计出选课门数。Create procedure report id char(8) asSelect 学生.姓名,课程.课程名,
5、选课.成绩,count (课程.课程编号#)Where 学生.学号# = id and 选课.学号# = 学生.学号# and 选课.课程编号# = 课程.课程编号#(20) 建立一个存储过程,通过输入教师编号,显示教师的姓名,任课课程名,教师院系。Create procedure report id char(8) as Select 教师.姓名,课程.课程名,院系.系名From 院系,课程,教师,任课Where 教师.教师编号# = id and 任课.教师编号# = 教师.教师编号# and 课程.课程编号# = 任课.课程编号 and 教师.系编号 = 院系.系编号(21) 建立一个存
6、储过程,输入系编号显示学生的学号,姓名。Create procedure report id char (8) asSelect 学号#,姓名Where 系编号# = id 2、有一数据库,包含以下基本表:(1) 建立销售明细表,销售编号为主码,外码为商品编号,会员号。Create table 销售明细(销售编号# char(4), 商品编号# char(4), 会员号# char(4), 数量 integer, 时间 time, primary key (销售编号#), foreign key (商品编号#) references 商品(商品编号#), foreign key (会员号#)
7、references 会员(会员号#),(2) 添加一条商品记录(00697,雕牌肥皂,浙江,2.00,日化)insert into 商品 values(00697,”雕牌肥皂”,”浙江”,2.00,”日化”)(3) 产生00695号产品的销售细帐。From 销售明细Where 商品编号# = 00695(4) 根据商品编号00695查找该商品的销售总量。Select sum (数量)(5) 根据会员号104095删除其会员记录。Delete from 会员Where 会员号# = 104095(6)建立一个黄金会员视图。(消费总金额高于5000的会员为黄金会员)create view 黄金会
8、员as (select *from 会员where 消费总金额 5000 )(7)建立一个触发器,实现当输入一条销售记录时,将消费金额自动累加到会员的消费总金额。Create trigger trinameOn 销售明细For insert as Updata 会员Set 消费总金额 = 消费总金额 + sum (销售明细.数量*商品.单价)Where 销售明细.会员号# = 会员.会员号# and 商品.商品编号# = 销售明细.商品编号#实验二 PowerBuilder编程基础2、掌握PowerBuilder语法及函数的使用。1、对w_data的open事件编程,使w_data一打开dw_
9、1中就显示数据。(1)显示数据Dw_1. settransobjict (splca)Dw_1. retrieve( ) (2)添加int II= dw_1. insertrow (0)Dw_1. scrolltorow (i)Dw_1. setfocus ( ) 删除 dw_1 . deleterow (0) 保存 int jj= dw_1 . updata ( )if I= -1 then messagebox (“information” , “数据无法保存”)end if关闭 close (parent ) (3)对w_data 的closequery事件编程,使dw_1中的数据发生改
10、变而又未保存就退出窗口时给用户一个消息框提示。Integer mIf dw_1.modifiedcount ( ) + deletedcount ( )0 thenM = messagebox (“信息”“数据已改变,是否保存”,question!YesNoCance!If m=1 then If dw_1.updata ( )= -1 thenMessagebox (“information”,”无法保存数据”) Else Messagebox (“information”,”已保存数据”) End if Return 0Elseif m=2 thenElseif m=3 then Retu
11、rn 12、ddlb_1中为各系名称,当选择了一个系后tv_1显示该系学生姓名,对ddlb_1的selectionchanged事件编程。Int I String outnameDeclare namecur cursor forSelect distinct departmentWhere department = :ddlb_1.textOpen namecur ;If sqlca.sqlcode = -1 then Messagebox ( “sql error “, sqlca ,sqlerrtext )Else Fetch namecur into :outname ;Do wher
12、e sqlca .sqlcode = 0 Frtch namecur into : I=tv_1 .insertitemlast ( ) ,outname,2)L00p while sqlca .sqlcode = 0Tv_1 :deleteitem (i)End if Close namecur ;3、 ddlb_1为下拉列表框,st_1,st_2为静态文本框。该窗口打开时,ddlb_1从数据库中的院系表中读出了所有系名,当选择了某系时st_1,st_2分别显示该系系领导和系办电话。(1) 在w_1的open事件下编程。 Ddlb_1.additem (outname)L00p (2) 在d
13、dlb_1的selectionchanged事件下编程。Select 系领导,系办电话Where 系名= :st_1.text = 系领导st_2.text = 系办电话4、w_query上有控件ddlb_1和dw_1,在ddlb_1中选择系名后dw_1中显示该系的学生。(1) 如果通过带参数的数据窗口对象来完成,请问dw_1中的数据窗口对象的数据源为quick select 还是sql select。答:sql select。(2) 为ddlb_1的selectionchanged事件编程。Dw_1.settransobject (sqlca)Dw_1.retricve (ddlb_1.te
14、xt)5、当选择了某单选框并输入选择条件,按回车后,dw_1中显示满足条件的记录。请对以下控件编程。(1) rb_1sle_1.enabled= true (2) sle_1dw-1.setfilter (“姓名= ”+ sle_1.text +” ”)dw_1.filter ( )cb_1.visible = true (3)cb_1rb_1.checked = falserb_2.checked = falserb_3.checked = falserb_4.checked = falsesle_1.text = “”sle_2.text = “”sle_3.text = “”sle_4.
15、text = “”sle_1.enable = falsesle_2.enable = falsesle_3.enable = falsesle_4.enable = false6、lv_1为列表视图,报表风格,当w_list打开时lv_list中显示数据库中学生表的所有学生的信息。请为w_1的open事件编程。Integer I, j , outageString outname , outsex , soutageLv_1.addcolumn (“姓名”,left! , 800)Lv_1.addcolumn (“性别”,left! , 500)Lv_1.addcolumn (“年龄”,le
16、ft! , 200)Select 姓名,性别,年龄From 学生;If sqlca.sqlcode = 1 then Messagebox (“sql.error” , sqlca.sqlerrtext )Else I=1 Do outname, :outsex, :outage ; J=I Lv_1.setitem(I, 2, outname ) Lv_1.setitem(I, 2, outsex ) Soutage = string (outage) Lv_1.setitem (I, 3, soutage) I+ Loop while sqlca.sqlcode=0 Lv_1.delete
17、item ( j)End if实验三 计算器设计2、掌握PowerBuilder数据窗口的创建及使用。 1、 用PowerBuilder实现如下计算器(图1):(图1)(CTRL+C:复制按钮及按钮中的代码;CTRL+T:复制按钮但不复制按钮中相应的代码)(1)声明变量decimal data /保存中间结果char str /保存按下的运算符int flag /flag=1表示按下的数字是前面数字的一部分,flag=0表示按下的数字是一个新的数字的开始(2)十个数字按钮和小数点按钮代码if flag=0 then sle_1.text= flag=1sle_1.text=sle_1.text
18、+this.text(3)+、-、*、/运算按钮代码choose case str case * sle_1.text=string(dec(sle_1.text)*data)/ sle_1.text=string(data/dec(sle_1.text)+ sle_1.text=string(dec(sle_1.text)+data)- sle_1.text=string(data - dec(sle_1.text)end choosedata=dec(sle_1.text)str=this.textflag=0(4)“清除”按钮代码sle_1.text=data=0str=(5)“=”按钮
19、代码(6)“应用程序”open事件代码open(w_calculator)2、求一元二次方程的实根:ax2+bx+c=0(如图2)建六个静态文本框(st_1、st_2、st_3、st_4、st_5),五个单行编辑框(sle_1、sle_2、sle_3、sle_4、sle_5),三个命令按钮( cb_1、cb_2、cb_3)(图2)(1)“求解”按钮代码dec a,b,c,d,x1,x2a=dec(sle_1.text)b=dec(sle_2.text)c=dec(sle_3.text)d=b*b - 4*a*cif d = 0 thenx1=(-b + sqrt(d)/(2*a)x2=(-b
20、- sqrt(d)/(2*a)sle_4.text=string(round(x1,6)sle_5.text=string(round(x2,6)else messagebox(提示,方程无实根(2)“清除”按钮代码sle_2.text=sle_3.text=sle_4.text=sle_5.text=(3)“退出”按钮代码close(w_aa)(4)应用程序open事件代码open(w_aa)实验四 数据窗口设计1、建立数据库有数据表(1)建立学生信息表s:表1snosnamesexagesedept9801李铭男19计算机软件9802刘晓鸣20计算机应用9806刘成刚219807王铭229
21、808宣明尼女189809柳红利9803李明9804张鹰9805刘竟静创建S表的SQL命令如下:create table S( sno char(4),sname char(8),sex char(2),age char(2),sdept char(10);insert into S values(9801,李铭男19计算机软件);9802刘晓鸣20计算机应用9806刘成刚219807王铭229808宣明尼女189809柳红利9803李明9804张鹰9805刘竟静select * from S;(2)建立学生课程信息表c:表2cnocnamecdepttnameC1PASCAL王晓名C2数据结构刘红C6WINDOW技术吴志刚C3离散数学李严劲C4计算机原理C5数据库原理C9系统结构C8编译原理蒋莹岳创建C表的SQL命令如下:create table c(cno char(4),cname char(10),cdept char(10),tname char(8);insert into c values(c1PASCAL王晓名c2数据结构刘红c6WINDOW技术吴志刚c3离散数学李严劲c4计算机原理c5数据库原理insert into c values (c9系统结构
copyright@ 2008-2022 冰豆网网站版权所有
经营许可证编号:鄂ICP备2022015515号-1