2023年4月浙江自考《软件开发工具》实践环节考核指导二

样题四一、界面设计：（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 thensle_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))elsemessagebox("提示","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]