数据库系统原理实验讲义20 14.docVIP

  • 1
  • 0
  • 约2.61万字
  • 约 40页
  • 2019-10-25 发布于广东
  • 举报
PAGE PAGE 24 《数据库系统原理》 上 机 实 验 讲 义 数学与计算机科学学院 编写:颜清 实验一 计算器设计 一、实验目的 1、熟悉PowerBuilder运行环境; 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=1 end if sle_1.text=sle_1.text+this.text (3)+、-、*、/运算按钮代码 choose case str case * sle_1.text=string(dec(sle_1.text)*data) case / sle_1.text=string(data/dec(sle_1.text)) case + sle_1.text=string(dec(sle_1.text)+data) case - sle_1.text=string(data - dec(sle_1.text)) end choose data=dec(sle_1.text) str=this.text flag=0 (4)“清除”按钮代码 sle_1.text= data=0 str= flag=0 (5)“=”按钮代码 choose case str case * sle_1.text=string(dec(sle_1.text)*data) case / sle_1.text=string(data/dec(sle_1.text)) case + sle_1.text=string(dec(sle_1.text)+data) case - sle_1.text=string(data - dec(sle_1.text)) end choose flag=0 str= (6)“应用程序”open事件代码 open(w_calculator) 实验二 计算器设计 求一元二次方程的实根:ax2+bx+c=0(如图2) 建六个静态文本框(st_1、st_2、st_3、st_4、st_5、st_6),五个单行编辑框(sle_1、sle_2、sle_3、sle_4、sle_5),三个命令按钮( cb_1、cb_2、cb_3) (图2) (1)“求解”按钮代码 dec a,b,c,d,x1,x2 a=dec(sle_1.text) b=dec(sle_2.text) c=dec(sle_3.text) d=b*b - 4*a*c if d = 0 then x1=(-b + sqrt(d))/(2*a) x2=(-b - sqrt(d))/(2*a) sle_4.text=string(round(x1,6)) sle_5.text=string(round(x2,6)) else messagebox(提示,方程无实根) end if (2)“清除”按钮代码 sle_1.text= sle_2.text= sle_3.text= sle_4.text= sle_5.text= (3)“退出”按钮代码 close(w_aa) (4)应用程序open事件代码 open(w_aa) 实验三 数据库的设计 一、实验目的 1、熟悉PowerBuilder运行环境; 2、掌握PowerBuilder数据窗口的创建及使用。 二、实验内容 1、建立数据库(有三个数据表) (1)建立学生信息表s: 表1 sno sname sex age sedept 9801 李铭 男 19 计算机软件 9802 刘晓鸣 男 20 计算机应用 9806 刘成刚 男 21 计算机软件 9807 王铭 男 22 计算机应用 9808 宣明尼 女 18 计算机应用 9809 柳红利 女 19 计算机软件 9803 李明 男 22 计算机应用 9804 张鹰 女 21 计算机软件 9805 刘竟静 女 22 计算机软件 创建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

文档评论(0)

1亿VIP精品文档

相关文档