环境管理软件开发工具与环境修改精品

《环境管理软件开发工具与环境修改精品》由会员分享，可在线阅读，更多相关《环境管理软件开发工具与环境修改精品（11页珍藏版）》请在金锄头文库上搜索。

1、 本文由淡言人生贡献 doc文档可能在WAP端浏览体验不佳。建议您优先选择TXT，或下载源文件到本机查看。 信息系统开发工具实验指导 实验一： 实验一：熟悉 PowerBuilder 9.0 的开发环境 实验目的：掌握 PowerBuilder 9.0 的开发环境的基本操作 实验目的： 实验要求： 实验要求：上机熟悉 pb 的环境和完成一个 简单的例子 实验内容： 实验内容：一个简单的应用程序 实验步骤： 实验步骤： 1) 启动 PowerBuilder 9.0 应用程序 步骤： 开始菜单程序SybasePowerBuilder 9.0PowerBuilder 9.0。 启动后如图 1-1 所

2、示： 2) 一个具体的例子 首先在 D 盘创建文件夹，名称为： “应用程序” 。 1) 新建一个工作空间对象 单击“file”菜单，选择“New” ， 1 信息系统开发工具实验指导 然后在出现的“New Workspace”对话框中选择保存路径和确定工作空间名称。如下图所 示： 单击保存。 2) 新建一个应用程序对象 单击“file”菜单，选择“New” ，在“New”对话框中选择“Target” 。如下图所示。 2 信息系统开发工具实验指导 单击 “OK” 在出现的 ， “Specify New Application and Library” 对话框中的 “application name

3、” 中输入应用程序名（如，A_main，注意：应用程序的名称不能与工作区的名称同名） ，在 下面的“Library”采用默认的即可。如 3 信息系统开发工具实验指导 单击“Finish” ，结果如下： 3) 新建窗体 单击“file”菜单，选择“New” ，在“New”对话框中选择“PB Object” 。如下图所 示。 单击“OK” ，结果如下： 4 信息系统开发工具实验指导 4) 应用程序界面设计 （1）选择控件，方法单击工具栏上的 按钮，如下图所示： 然后选择某一控件，最后在窗体上单击，控件便画在窗体上了。如图所示： 5 信息系统开发工具实验指导 在窗体上画出下图所示的控件。 （2）编写

4、代码 双击确定按钮，在确定按钮的 click 事件下编写如下代码：如下图所示： 同理，双击重置按钮，编写如下代码 Sle_1.text=” Sle_2.text=” 6 信息系统开发工具实验指导 Sle_3.text=” 在退出按钮下编写，如下代码： Close(parent) (3)保存窗体 5）编写应用程序对象的代码 双击系统树中的 ，为应用程序编写代码，如下图所示：最后保存 6）运行 单击“ ”运行，就可以看到你的制作成果。 试验二： 试验二：Power Script 编程语言 实验目的： 实验目的：掌握 PowerBuilder 9.0 的 Power Script 编程语言 实验要求

5、： 实验要求：上机熟悉 Power Script 编程语言并完成一个简单的应用程序 实验内容： 实验内容：一个简单的应用程序 试验步骤： 试验步骤： 1建立一个工作空间，命名为“jedxxzh_workspace” ，并保存在“d:金额大小写转换”目 录下，然后建立一个应用程序对象，命名为“jedxxzh_app” ，保存在“d:金额大小写转 换”目录下。 2新建一个窗口，命名为“jedxxzh_win” ，在窗口上添加 3 个静态文本框，2 个单行编辑 框和两个命令按钮、一个组合框。如下图所示： 7 信息系统开发工具实验指导 3编写代码 （1） 为应用程序对象添加代码 在应用程序的 Open

6、 事件中输入如下代码来打开“jedxxzh_ win”窗口。 Open(jedxxzh_ win) （2） 在【转换】按钮的 clicked 事件下编写如下代码： a=叁 Long i,j,k,n String a,aa,cc,cm10,b10 Case 4 Cc= a=肆 Cm1=分 Case 5 a=伍 Cm2=角 Cm3=元 Case 6 a=六 Cm4=拾 Cm5=佰 Case 7 a=柒 Cm6=千 Cm7=万 Case 8 Cm8=拾 a= 捌 Cm9=佰 Case 9 Cm10=仟 a=玖 For i=1 to 10 Case 0 bi=* a=零 Next case else

7、k=round(real(sle_1.text),2)*100 a=* aa=string(k) end choose k=len(aa) bk+(-n)+1=a For n=k to 1 step -1 next a=mid(aa,n,1) cc= choose case a for i=10 to 1 step -1 case 1 if bi=* then a=壹 continue Case 2 end if cc=cc+bi+cmi A=贰 Case 3 next sle_2.text=cc 8 信息系统开发工具实验指导 （3） 在【退出】按钮的 clicked 事件下编写如下代码： C

8、lose(parent) 思考：怎样把大写金额转换为小写金额 试验三： 试验三：使用 SQL 语句 实验目的： 实验目的：掌握在 PowerBuilder 9.0 的开发环境中使用简单的 SQL 语句 实验要求： 实验要求：上机实现各种 SQL 语句 实验内容： 实验内容：创建数据库和编程实现一个简单的登录程序 内容 试验步骤： 试验步骤： 1 创建数据库 鼠标单击工具栏上的 （Database） 按钮， 再单击 ODB ODBC， 单击 Utilities， 双击 Create ASA Database。如下图所示： 接着在弹出的窗口中输入如下图的信息并命名为 data（注意：在 Use T

9、ransaction Log 选项 前去掉“” 。 9 信息系统开发工具实验指导 单击 ok，进入下面的窗口 10 信息系统开发工具实验指导 在上图的 table 项，单击右键，弹出属性窗口。选择 New Table，并单击，在 columns 窗口 中输入如数据。 输入完毕后，保存，出现以下对话框，并输入以下内容。 单击 ok，数据库表就创建完毕。 2为数据库表创建主键 在 object layout 画板中，选中 sp 表，单击右键，弹出属性窗口，如下图所示。 11 信息系统开发工具实验指导 单击 Primary Key，进入如下窗口。 在 General 选项卡中，在商品编号前打，然后关

10、闭保存。出现如下窗口，说明主键创建 成功： 同理，我们在创建一个数据库表，名称为“tb_user” ，并设置主键。如下图所示 12 信息系统开发工具实验指导 4在 Interactive SQL 中使用 SQL 语句 （1） 启动 Interactive SQL 开始菜单程序SybaseAdaptive Server AnywhereInteractive SQL，出现如下窗口， 并在 User 中输入 dba；Password 中输入 sql 单击，OK。进入 Interactive SQL，在 sp 数据库表中插入一条记录，如下图所示： 13 信息系统开发工具实验指导 (2)数据的添加（i

11、nsert into 语句） 请同学们自己为 sp 数据表插入如下 5 条记录（注意，输入的内容要与数据表的结构 一致） 商品编号 商品名称 产地 供应商名称 进价 数量 总 金 额 0 0 0 0 0 2007091299 笔 记 m120 2007091383 硬盘 2007091471 优盘 2007100101 手机 2007110101 内存 本 中 国 福 Dell 亚洲公司 建 中 国 广 start 公司 东 中国 兴隆工作室 中国 中国 12000.0 5 340.0 200.0 10 10 20 10 海量手机批发公 2450.0 司 前进电脑公司 250.0 为 tb_u

12、ser 添加如下记录 用户名 张前 王小小 (3)运用 select 语句查询 供应商名称中含有“公司”的记录 数量在 10 以上的商品 总金额大于 3000 元的商品 （4）用 update 语句修改总金额字段的数据（总金额=数量*进价） 14 密码 1234554321 123001 用户级别 1 0 信息系统开发工具实验指导 （5）删除供应商名称为“兴隆工作室”的记录 5在 pb 中使用 sql 语句 （1）建立一个工作空间，命名为“sql_workspace” ，并保存在“d:sql”目录下，然后建立 一个应用程序对象，命名为“sql_app” ，保存在“d:sql”目录下。 （2）新

13、建一个窗口，命名为“w_login” ，其效果如下图所示： （3）另外，再新建一个窗口，命名为“w_insert_sp” ，如下图所示： （4）编写代码 在窗体“w_login”中，双击窗体空白，在窗体的 open 事件下编写代码： string xm DECLARE zgxm CURSOR FOR SELECT tb_user.用户名 FROM tb_user ; open zgxm; fetch zgxm into :xm; 15 信息系统开发工具实验指导 do while sqlca.sqlcode=0 ddlb_1.insertitem(xm, 1) fetch zgxm into :

14、xm; loop close zgxm; 在窗体“w_login”中，双击确定按钮，在确定按钮的 click 事件下编写代码： string yhm,psd if ddlb_1.text= then messagebox(信息提示,请选择一个用户名) return end if if sle_1.text= then messagebox(信息提示,请输入密码) return end if yhm=trim(ddlb_1.text) select 密码 into:psd from tb_user where 用户名=:yhm; if psd=trim(sle_1.text) then open(w_insert_sp) else messagebox(信息提示,密码不正确) return end if 在窗体“w_login”中，双击取消按钮，在取消按钮的 click 事件下编写代码： Close(parent) 请同学们完成窗体“w_insert_sp”的编程。功能：实现数据的添加。 （5）为应用程序编写代码 粘贴数据库连接代码 鼠标单击工具栏上的 （Database）按钮，在当前连接的数据库描述文件上单击鼠标右 键，选择 Properties，如下图所示： 在弹