设计一个名为“mysupply”的表单，表单的控件名和文件名均为“mysupp[y”。表单的形式如图5—1所示。

图5—1

表单标题为“零件供应情况”，表格控件为Gridl，命令按钮“查询”为Commandl、“退出”为Command2，标签控件Labell和文本框控件Textl（程序运行时用于输入工程号）。

运行表单时，在文本框中输入工程号，单击“查询”命令按钮后，表格控件中显示相应工程所使用的零件的零件名、颜色和重量（通过设置有关“数据”属性实现），并将结果按“零件名”升序排序存储到“PP．dbf”文件中。

单击“退出”按钮关闭表单。

完成表单设计后运行表单，并查询工程号为“J4”的相应信息。

设计一个名为“mysupply”的表单，表单的控件名和文件名均为“mysupp[y”。表单的形式如图5—1所示。

图5—1

表单标题为“零件供应情况”，表格控件为Gridl，命令按钮“查询”为Commandl、“退出”为Command2，标签控件Labell和文本框控件Textl（程序运行时用于输入工程号）。

运行表单时，在文本框中输入工程号，单击“查询”命令按钮后，表格控件中显示相应工程所使用的零件的零件名、颜色和重量（通过设置有关“数据”属性实现），并将结果按“零件名”升序排序存储到“PP．dbf”文件中。

单击“退出”按钮关闭表单。

完成表单设计后运行表单，并查询工程号为“J4”的相应信息。

（1）请编写名称为CX的程序并执行。该程序实现下面的功能：将工资表进行备份，备份文件名为“b_工资．dbf”。利用“人事部”向“财务部”提供的雇员工资调整表“c_工资”的“工资”，对工资表的‘‘工资”进行调整（请注意：按“职员编号”相同进行调整，并且只是部分职员的工资进行了调整，其他职员的工资不动）。最后将工资表中的记录存储到“n_ 工资”表中（表结构与工资表完全相同）。

（2）设计一个文件名为“bd2”的表单，其中包含“调整工资”和“关闭”两个命令按钮。

单击“调整工资”命令按钮时，调用CX命令程序实现工资调整。

单击“关闭”命令按钮时，关闭表单。

注意：在两个命令按钮中均只有一条命令，不可以有多余命令。

在考生文件夹下有“住宿管理”数据库，其中包含表“宿舍”和表“学生”。这两个表之间存在一对多的关系。对该数据库建立表单文件，文件名为“bd2”，标题为“住宿管理”，完成如下要求：

（1）在表单中包含两个表格控件，第一个用于显示“宿舍”表中的记录，第二个表格用于显示与“宿舍”表中的当前记录对应的学生表中的记录。

（2）在表单中包含一个“关闭”命令按钮，单击该按钮退出表单。

（1）在考生文件夹下，将“books”表中所有书名中含有“计算机”3个字的图书复制到“books_BAK”表中，以下操作均在“books_BAK”表中完成。

（2）复制后的图书价格在原价格的基础上降低5％。

（3）从图书均价高于25元（含25）的出版社中，查询并显示图书均价最低的出版社名称及均价，查询结果保存在‘new_table4”表中（字段名为出版单位和均价）。

（1）编写程序“cx1．prg”，对职员信息表完成如下3个功能：

①删除“职员编号”为“0010”的商品的记录。

②将所有人的“月薪”增加l0％。

③查询“籍贯”为“上海”的表记录。

（2）根据数据库“公司”中的表“部门”和表“职员信息”建立一个查询，该查询包含字段“部门名称”、“姓名”和“职员编号”。查询条件为“月薪”在3200元（含）以上。要求按“职员编号”升序排序，并将查询保存为“qry1”。

设计一个表单名和文件名均为“bd2”的表单，所有控件的属性必须在表单设计器的属性窗口中设置。表单的标题为“外币市值情况”。表单中有一个文本框、一个表格和两个命令按钮“查询”和“关闭”。

运行表单时，在文本框text1中输入货币代码，然后单击“查询”，则表格中会显示出外汇账户相应的账户信息及持有外币相当于人民币的价值数量。注意，某种外币相当于人民币数量的计算公式：人民币价值数量一该种外币的“买入价”*该种外币的“数量”。

单击“关闭”按钮关闭表单。

在考生文件夹下完成如下简单应用：

（1）用SQL语句完成下列操作。列出所有与“黑色”颜色零件相关的信息（产品编号、零件名称和数量），并将检索结果按数量降序排序存放于表“result1”中，将SQL语句保存在“cx1.prg”文件中。

（2）建立一个名为“cd1”的快捷菜单，菜单中有两个菜单项：“查询”和“修改”。然后在表单“bd1”中的RightClick事件中调用快捷菜单“cd1”。

（1）设计时钟应用程序，具体描述如下：

表单名和表单文件名均为“timer”，表单标题为“时钟”，表单运行时自动显示系统的当前时间。

①单击“暂停”命令按钮，时钟停止；

②单击“继续”命令按钮时，时钟继续显示系统的当前时间；

③单击“关闭”命令按钮时，关闭表单。

提示：使用计时器控件，将该控件的Interval属性设置为1000，即每1000毫秒触发一次计时器控件的Timer事件（显示一次系统时间）；将计时器控件的Interval属性设置为“o”将停止触发Timer事件；在设计表单时将Timer控件的Interval属性设置为1000。

（2）使用查询设计器设计一个查询“qryl”，要求如下：

基于自由表“货币代码”和“外汇账户”，查询含有字段“账户”、“货币名称”、“数量”、“买入价”及表达式“买入价* 数量”，先按“账户”升序排序，再按“数量”降序排序，查询去向为表“result．dbf”，完成设计后将查询保存，并运行该查询。

（1）在考生文件夹中有“种植信息”表。用SQL语句查询每种品种的“种植品种”、“市场价”、“种植成本”、“数量”和“净收入”，其中“净收入”=每种品种的“市场价”-“种植成本”*“数量”。查询结果按“净收入”升序排序，“净收入”相同的按“种植品种”排序，将结果存放于表“净收入”中，将使用到的SQL代码保存到“result．txt”中。

（2）在考生文件夹下有表“种植信息”，在考生文件夹下设计一个表单“bdl”，表单标题为“种植信息”。该表单为“种植信息”表的窗口输入界面，表单上还有一个标题为“关闭”的按钮，单击该按钮退出表单。

（1）统计“职员信息”表中每个部门的人数和保险总额，统计结果中包含字段“部门编号”、“部门名称”、“人数”和“保险总额”，按“部门编号”排序。并将结果放在表“result”中。

（2）打开“bdl”表单，并按如下要求进行修改（注意要保存所做的修改）：在表单的数据环境中添加“职员信息”表。表单中有“表格”控件，修改其相关属性，在表格中显示“职员信息”表的记录。