【www.kwkids.com--二级建造师】
2010年计算机等级二级VB考试练习题及答案二套（6）
IF 基本工资>=1500
SELECT 2
APPEND BLANK
REPLACE A->职工号WITH 职工号，A->基本工资 WITH 基本工资 &&*error*
SELECT 1
ENDIF
CONT ****Error****
ENDDO
SELECT 2
DISPLAY ALL
DELETE TABLE gzb.dbf ****Error****
CLOSE DATABASE
SET SAFE ON
SET TALK ON
*************************************
③ 修改程序中的错误。
****下面是修改后的工资查询.prg的程序内容：****
SET TALK OFF
SET SAFE OFF
SELECT 1
USE 工资表.dbf
COPY STRU TO gzb.dbf FIELDS 职工号，基本工资
SELECT 2
USE gzb.dbf
SELECT 1
GO TOP
DO WHILE ! EOF()
IF 基本工资>=1500
SELECT 2
APPEND BLANK
REPLACE 职工号WITH A-> 职工号， 基本工资 WITH A-> 基本工资
SELECT 1
ENDIF
SKIP
ENDDO
SELECT2
DISPLAY ALL
DROP TABLE gzb.dbf
CLOSE DATABASE
SET SAFE ON
SET TALK ON
***********************************
④ 在“命令”窗口输入：DO 工资查询.prg，运行程序。
【试题解析】
本试题主要考查了快速报表的建立和SQL语句的简单应用。在(1)小题中可以通过菜单命令建立一个快速报表文件。#p#副标题#e#
三、综合应用题
按如下要求完成综合应用(所有控件的属性必须在表单设计器的属性窗口中设置)：
(1)根据“项目信息”、“零件信息”和“使用零件”三个表建立一个查询(注意表之间的连接字段)，该查询包含项目号、项目名、零件名称和(使用)数量四个字段，并要求先按项目号升序排序、再按零件名称降序排序，保存的查询文件名为chaxun;
(2)建立一个表单，表单名和文件名均为myform，表单中含有一个表格控件Grid1，该表格控件的数据源是前面建立的查询chaxun;然后在表格控件下面添加一个“退出”命令按钮Command1，要求命令按钮与表格控件左对齐、并且宽度相同，单击该按钮时关闭表单。
【参考答案】
(1)具体步骤如下：
① 从“文件”菜单中选择“新建”命令，在弹出的“新建”对话框中选中“查询”单选按钮，单击“新建文件”按钮。
② 在弹出的“打开”对话框中选择打开“零件信息”表。
③ 系统打开“查询设计器”窗口，同时打开“添加表或视图”对话框，单击“其他”按钮添加“使用零件”、“项目信息”两个表，单击“关闭”按钮关闭对话框。
④ 在“字段”选项卡中的“可用字段”列表框中选择“项目信息.项目号”字段，单击“添加”按钮将其添加到“选定字段”列表框中，以同样的方法添加“项目信息.项目名”、“零件信息.零件名称”、“使用零件.数量”三个字段。
⑤ 在“排序依据”选项卡中的“选定字段”列表框中选择“项目信息.项目号”字段，单击“添加”按钮将其添加到“排序条件”列表框中，并选中“升序”单选按钮。
⑥ 在“选定字段”列表框中选择“零件信息.零件名称”字段，单击“添加”按钮将其添加到“排序条件”列表框中，并选中“降序”单选按钮，
⑦ 单击工具栏中的“保存”按钮，在弹出的“另存为”对话框中以chaxun为文件名保存。
(2)具体步骤如下：
① 从文件”菜单中选择“新建”命令，在弹出的“新建”对话框中选中“表单”单选按钮，单击“新建文件”按钮，系统打开“表单设计器”窗口。
② 在“属性”窗口中设置表单的Name属性为myform。
③ 在“控件”工具栏中单击“表格”按钮，单击表单工作区域即可添加一个表格。
④ 在“属性”窗口中为表格设置如下属性：
RecordSourceType=“3-查询(.QPR)”
RecordSource=“chaxun”
⑤ 在表格的下方添加一个命令按钮，在“属性”窗口中修改按钮的Caption属性值为“退出”。
⑥ 在表单中选中表格，在“属性”窗口中查看表格的宽度并记下。
⑦ 在表单中选中命令按钮，然后在“属性”窗口中将其宽度改为和表格一样的宽度。
⑧ 在表单中选中命令按钮，在“属性”窗口中双击Click事件，在弹出的窗口中添加如下代码：
THISFORM.RELEASE
⑨ 单击工具栏中的“保存”按钮，在弹出的对话框中以myform为文件名保存。