《软件开发工具》实践环节考核指导二

发布日期:2018-05-23 编辑整理:山东自考网 【字体: 】  【加入自考交流群】

样题四
一、界面设计:(50分)
在指定文件夹D:\bb中创建应用程序库b1.pbl,并在其中开发应用b1,使其能在PowerBuilder下运行。运行该应用时会打开如下窗口(左):

用户在复选框中选择若干个课程,并单击“确定”按钮时,就会弹出“确认”信息框,显示“您的课程有: *** *** ***”;单击按钮“退出”时,就会退出该应用程序。
二、数据库操作(50分)
在指定文件夹D:\ce中创建应用程序库ctest3.pbl,并在其中开发“应用ce3”,使其能在PowerBuilder下运行。运行该应用时会打开如下窗口(包括一个数据窗口控件和命令按钮“浏览”,“查询”,“结束”):
 
要求:(1)用户为本地磁盘上的Visual Foxpro数据库文件xsk(学生库)建立ODBC数据源,数据源名称为:xstest。
(2) 在PowerBuilder中建立到xstest的连接。当用户单击按钮“浏览”时,数据窗口中就会显示xsk.mdb中表student中的全部数据(以表格形式显示,并可用滚动条查看)。
  (3)当用户在文本框中输入一个学生姓名,并按“查询”按钮时,系统将显示表student表中姓名取值为输入值的所有记录。
 (4)单击“结束”时系统将关闭窗口。
提示:xsk可自行利用VFP创建。
样题参考答案
样题一
一、界面设计
 
创建有关对象:
  新建Workspace;
创建应用ce1;
创建窗口w_main;其text为“应用ce1”.
在窗口中创建控件如上所示。
有关脚本:
  应用:open(w_main)
按钮click事件的代码:
  减法: if real(sle_2.text)>=0 then
sle_3.text=string(real(sle_1.text)-real(sle_2.text))
else
  messagebox("提示","数据非法!")
end if
  除法: if real(sle_2.text)<>0 then
  sle_3.text=string(real(sle_1.text)/real(sle_2.text))
else
messagebox("提示","0不能做为除数!")
end if
其他按钮的click代码与上面基本相同。
  清除:  sle_1.text=""
sle_2.text=""
sle_3.text=""
  结束: close(w_main)

二、数据库操作
 

创建有关对象:
  新建Workspace;
创建应用ce2。
创建窗口w_main;其text为“应用aa2”.
在窗口中创建控件如上所示。(一个数据窗口控件,两个按钮)。
创建数据窗口,名称为dw_1, 数据窗口以表格形式显示数据表printer中的内容。然后此窗口与数据窗口控件相联系。
有关脚本:
应用(相关代码可从ODBC编辑器的Preview中粘贴):
  SQLCA.DBMS = "ODBC"
  SQLCA.Database = "Powersoft Demo DB V6"
  SQLCA.AutoCommit = False
  SQLCA.DBParm = "ConnectString='DSN=Powersoft Demo DB V6;UID=dba;PWD=sql'"
  connect using SQLCA;
  if sqlca.sqlcode<>0 then
 messagebox("数据库连接错误!","无法建立到数据库的连接!")
 return
  end if

[1]  

本文标签:山东自考 工学类 《软件开发工具》实践环节考核指导二

转载请注明:文章转载自(http://www.sdzk.sd.cn

本文地址:http://www.sdzk.sd.cn/zl_gxl/5515.html







《山东自考网》免责声明:

1、由于各方面情况的调整与变化,本网提供的考试信息仅供参考,考试信息以省考试院及院校官方发布的信息为准。

2、本站内容信息均来源网络收集整理,标注来源为其它媒体的稿件转载,免费转载出于非商业性学习目的,版权归原作者所有,如有内容与版权问题等请与本站联系,本站将第一时间尽快处理删除。联系邮箱:812379481@qq.com。



山东自考-便捷服务