2013年3月计算机二级VB考前冲刺试卷及答案(7)

　　2.简单应用题

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

　　(1)将order_list1表中的全部记录追加到order_list表中，然后用SQL SELECT语句完成查询：按总金额降序列出所有客户的客户号、客户名及其订单号和总金额，并将结果存储到results表中(其中客户号、客户名取自customer表，订单号、总金额取自order_list表)。

　　(2)打开FORM1表单，并按如下要求进行修改(注意：最后保存所做的修改)：

　　① 表单中有5个随机排列的命令按钮，不要移动或改变“基准按钮”的位置(否则影响成绩)，使其他命令按钮与“基准按钮”左部对齐;

　　② 在这组命令按钮的右边添加一个表格控件，并将它的RecordSourceType属性设置为“表”，然后设置另一个相关属性，使在表格控件中显示customer表的记录。

　　【参考答案】

　　(1)在“命令”窗口中执行以下命令：

　　USE order_list1 　来源:考试大网

　　COPY TO order_list

　　SELECT customer.客户号,客户名,订单号,总金额 FROM customer;

　　INNER JOIN order_list ON customer.客户号=order_list.客户号;

　　ORDER BY 总金额 DESC INTO TABLE results

　　(2)具体步骤如下：

　　① 打开表单文件FORM1。

　　② 选择“基准按钮”，再分别选择其他4个按钮，单击“布局”工具栏中的“左对齐”图标按钮。

　　③ 单击控件工具栏中的“表格”按钮，在表单的右边位置单击，添加一个表格，在“属性”窗口中更改RecordSourceType属性为“表”，更改RecordSource属性为customer。

　　④ 保存表单即可。

　　3.综合应用题

　　当order_detail表中的单价修改后，应该根据该表的“单价”和“数量”字段修改order_list表的总金额字段，现在编写程序实现此功能，具体要求和注意事项如下：

　　(1)根据order_detail表中的记录重新计算order_list表的总金额字段的值。

　　(2)一条order_list记录可以对应几条order_detail记录。

　　(3)在编程前应保证在基础操作中正确地建立了order_list表，在简单应用中为该表追加了记录(注意，只能追加一次)。

　　(4)最后将order_list表中的记录按总金额降序排序存储到od_new表中(表结构与order_list表完全相同)。

　　(5)将程序保存为prog1.prg文件。

　　【参考答案】

　　实现此功能的程序如下：

　　set talk off

　　open database 订货管理

　　sele 1

　　use order_list

　　do while not eof()

　　ddh=订单号

　　sele 2

　　use order_detail

　　locate for 订单号=ddh

　　je=0

　　do while not eof()

　　je=je+单价*数量

　　cont

　　endd

　　sele 1

　　repl 总金额 with je

　　skip

　　endd