VF6.0数据库原理与应用 胡晓燕 第10章 综合实验(实验十七).pptVIP

第10章 综合实验(实验十七) 1. 实验要求 完成一个简单的综合性应用的设计和操作。 2. 实验内容 (1) 利用9.4节所设计的菜单操作表单。 (2) 主菜单的菜单项包括数据维护、编辑和退出。 (3) 弹出式菜单WH菜单项包括全部显示和记录查询，要求用相应的表单显示结果。 (4) 弹出式菜单BJ包括添加、删除和插入三个选项，要求在查询表单上显示结果。 3. 实验步骤 1) 利用表单设计器设计“显示全部”表单 (1) 在项目管理器中，选择“表单”选项，然后单击“新建”按钮，再单击“新建表单”按钮，打开“表单设计器”。 (2) 在表单上添加一个按钮，并在“属性”窗口设置表单和按钮的属性如下： 表单： 属性 取值 Name frmShowAll Caption 显示全部 BorderStyle 2-固定对话框 ControlBox .F. – 假 按钮： 属性 取值 Name cmdExit Caption 退出 (3) 为表单设计方法程序。 ① 单击表单，然后再单击“属性”窗口中的“方法程序”选项卡，选择“Activate Event”项并双击，打开程序编辑窗口。(也可以双击表单自身，可以直接打开代码编辑窗口。 ② 类似地，可以为“退出”按钮编写程序。打开程序编辑窗口的方法如前所述，程序代码如下： close data thisform.release 输入代码完毕后可以关闭代码编辑窗口和表单设计器。表单被保存为显示全部.scx。 ③ “显示全部”表单的界面如图10-1所示。 ④ 打开菜单设计器，将“全部显示”子菜单的“结果”栏设置为“过程”，然后再单击“创建”按钮，在代码编辑器中添加如下代码： do form 显示全部.scx ⑤ “显示全部”表单运行结果如图10-2所示。 2) 利用表单设计器设计“全部显示”表单 (1) 与“显示全部”表单类似，打开表单设计器。 (2) 在“表单设计器”中添加控件，并在“属性”窗口中设置各控件的属性如下： ① 表单： 属性 取值 Name FrmQuery Caption 数据查询 BorderStyle 2 – 固定对话框 ControlBox .F. – 假 ② “数据库名”标签： 属性 取值 Caption 数据库名 AutoSize .T. – 真 ③ “查询数据表”标签： 属性 取值 Caption 查询数据表 AutoSize .T. – 真 ④ “查询字段”标签： 属性 取值 Caption 查询字段 AutoSize .T. – 真 ⑤ “数据库名”组合框等四个组合框，各自设置Name属性和大小。 ⑥ “查询结果”表格、两个按钮也仅修改其Name属性即可。 (3) 表单的界面设计结果如图10-3所示。 (4) 为有关控件添加代码。 3) 利用项目管理器制作可执行文件 (1) 在项目管理器中，添加“学籍管理”数据库，添加“显示全部”和“数据查询”表单，添加“学籍维护”菜单。之后，再新建一个程序Main.prg。其代码如下： do