1、二级 VISUAL+FOXPRO-8-1 及答案解析(总分：100.00，做题时间：90 分钟)一、基本操作题(总题数：1，分数：40.00)在下打开 DB 数据库，完成如下基本操作：（分数：40.00）(1).给表 TABB 增加一个字段，字段名为“日期”，数据类型为日期型。（分数：10.00）_(2).使用 SQL UPDATE 语句将表 TABB 中所有记录的“日期”字段的值修改为 2005-10-01，并将 SQL 语句存储到名为 two.prg 的文件中。（分数：10.00）_(3).表 TABA 中有重复的记录，用 SQL 语句将表 TABA 中的记录复制到另外一个与它具有相同结构
2、的表TABC 中，并消除重复的记录(对于重复多次的记录，只复制一条记录的数据)。然后将 SQL 的 SELECT 语句存储到名为 three.prg 的文件中。 提示：在 SQL SELECT 语句中去掉重复结果的关键词是 DISTINCT。（分数：10.00）_(4).使用报表向导建立一个简单报表，要求选择 TABA 中的所有字段：记录不分组；报表样式为随意式；列数为 1，字段布局为“列”，方向为“横向”；排序字段为 No，升序；报表标题为“计算结果一览表”；报表文件名为 P_ONE。（分数：10.00）_二、简单应用题(总题数：1，分数：20.00)在下打开 DB 数据库，完成如下简单应用
3、：（分数：20.00）(1).four.prg 程序的功能是根据表 TABA 中所有记录的 a、b、c 字段的值计算各记录的一元二次方程的两个根 x1 和 x2，并将两个根 x1 和 x2 写到对应的字段 x1 和 x2 中，如果无实数解，在 note 字段中写入“无实数解”。 注意：平方根函数为 SQRT()，请改正程序中的错误，然后运行该程序计算一元二次方程的两个根。 提示：一元二次方程公式如下。 （分数：10.00）_(2).打开文件名为 testA 的表单，表单界面上有两个命令按钮，界面要求如下。 设置两个按钮的高度为 30、宽度为 80，“退出”按钮与“查询”按钮顶边对齐； “查询”
4、按钮：在该按钮的 Click 事件中使用 SQL 的 SELECT 命令从表 TABA 中查询“无实数解”的记录并存储到表 TABD 中； “退出”按钮：关闭并释放表单。 按要求完成表单的设计，表单设计完成后运行该表单，单击“查询”按钮进行查询。（分数：10.00）_三、综合应用题(总题数：1，分数：40.00)1.在 下打开 SDB 数据库，完成如下应用： 创建一个标题名为“查询”、文件名为 testb 的表单，如下图所示。 （分数：40.00）_二级 VISUAL+FOXPRO-8-1 答案解析(总分：100.00，做题时间：90 分钟)一、基本操作题(总题数：1，分数：40.00)在下打
5、开 DB 数据库，完成如下基本操作：（分数：40.00）(1).给表 TABB 增加一个字段，字段名为“日期”，数据类型为日期型。（分数：10.00）_正确答案：()解析：打开考生文件夹下的 DB 数据库，在数据库设计器中右击 TABB 表，在弹出的快捷菜单中选择“修改”命令，在表设计器窗口中为表添加字段“日期”，类型为日期型。 答案考生文件夹(2).使用 SQL UPDATE 语句将表 TABB 中所有记录的“日期”字段的值修改为 2005-10-01，并将 SQL 语句存储到名为 two.prg 的文件中。（分数：10.00）_正确答案：()解析：新建一个程序 two，在其中输入“UPDA
6、TEtabb SET 日期=2005/10/01”，然后保存并运行程序。(3).表 TABA 中有重复的记录，用 SQL 语句将表 TABA 中的记录复制到另外一个与它具有相同结构的表TABC 中，并消除重复的记录(对于重复多次的记录，只复制一条记录的数据)。然后将 SQL 的 SELECT 语句存储到名为 three.prg 的文件中。 提示：在 SQL SELECT 语句中去掉重复结果的关键词是 DISTINCT。（分数：10.00）_正确答案：()解析：新建一个程序 three，在其中输入如下命令。 *three 程序文件中的代码* SELECT DISTINCT*; FROM TABA
7、; INTO TABLE TABC.dbf * 最后保存并运行程序。(4).使用报表向导建立一个简单报表，要求选择 TABA 中的所有字段：记录不分组；报表样式为随意式；列数为 1，字段布局为“列”，方向为“横向”；排序字段为 No，升序；报表标题为“计算结果一览表”；报表文件名为 P_ONE。（分数：10.00）_正确答案：()解析：通过报表向导建立报表，在“字段选取”对话框中选中 TABA 表，并将其中的所有字段添加到“选定字段”框中；在“分组依据”对话框中直接单击“下一步”按钮；在“选择报表样式”对话框中选择“随意式”；在“定义报表布局”对话框中选择“列数”为 1，选中“字段布局”列中的
8、“列”，选中“方向”列中的“横向”，然后单击“下一步”按钮；在“排序记录”对话框中选中“升序”，并将“No”字段添加到选定字段框中；最后定义报表标题为“计算结果一览表”，并保存报表为 P_ONE。二、简单应用题(总题数：1，分数：20.00)在下打开 DB 数据库，完成如下简单应用：（分数：20.00）(1).four.prg 程序的功能是根据表 TABA 中所有记录的 a、b、c 字段的值计算各记录的一元二次方程的两个根 x1 和 x2，并将两个根 x1 和 x2 写到对应的字段 x1 和 x2 中，如果无实数解，在 note 字段中写入“无实数解”。 注意：平方根函数为 SQRT()，请改
9、正程序中的错误，然后运行该程序计算一元二次方程的两个根。 提示：一元二次方程公式如下。 （分数：10.00）_正确答案：()解析：微步骤 新建程序 four，并输入以下命令： *four 程序文件中的代码* CLOS ALL USE TABA SCAN IF A0 AND B*B-4*A*C=0 REPL x1 WITH(-B+SQRT(B*B-4*A*C)/(2*A),x2 WITH(-B-SQRT(B*B-4*A*C)/(2*A) ELSE REPL NOTE WITH “无实数解“ ENDIF ENDSCAN * 最后保存运行程序。 答案考生文件夹(2).打开文件名为 testA 的表单
10、，表单界面上有两个命令按钮，界面要求如下。 设置两个按钮的高度为 30、宽度为 80，“退出”按钮与“查询”按钮顶边对齐； “查询”按钮：在该按钮的 Click 事件中使用 SQL 的 SELECT 命令从表 TABA 中查询“无实数解”的记录并存储到表 TABD 中； “退出”按钮：关闭并释放表单。 按要求完成表单的设计，表单设计完成后运行该表单，单击“查询”按钮进行查询。（分数：10.00）_正确答案：()解析：微步骤 步骤 1：打开表单 testA。 步骤 2：在按住 Shift 的同时选中“查询”和“退出”两个按钮，然后在属性窗口中设定它们的 Height属性为 30、Width 属性
11、为 80，在系统菜单中选择“格式”“对齐”“顶边对齐”命令。 步骤 3：在“查询”按钮的 Click 事件中输入下列代码。 *“查询”按钮的 Click 事件代码* SELECT*; FROM TABA; WHERE TABA.note=“无实数解“; INTO TABLE TABD.dbf * 步骤 4：在“退出”命令按钮的 Click 事件中输入“ThisForm.Release”，然后保存并运行表单。三、综合应用题(总题数：1，分数：40.00)1.在 下打开 SDB 数据库，完成如下应用： 创建一个标题名为“查询”、文件名为 testb 的表单，如下图所示。 （分数：40.00）_正确
12、答案：()解析：微步骤 步骤 1：打开数据库，在命令窗口中输入“Creaform testb，新建一个表单，然后按题目要求添加控件并修改各控件的属性。 表单的 AutoCenter 属性为“.T.-真”。 表单的 Caption 属性为“查询”。 标签的 Caption 属性为“学生注册日期”。 命令按钮 1 的 Caption 属性为“查询”。 命令按钮 2 的 Caption 属性为“退出”。 表格的 RecordSourceType 属性为“4-SQL 说明”。 步骤 2：为表单添加数据环境“学生表”。 步骤 3：输入“查询”按钮的 Click 事件代码。 *“查询”按钮的 Click
13、事件代码* CLOSE ALL SELECT*FROM 学生表; WHERE 学生表.注册日期=CTOD(ThisForm.Text1.Value); ORDER BY 学生表.年龄 DESC; INTO TABLE temp.dbf USE TABE DELE ALL PACK APPEND FROM TEMP THISFORM.GRID1.RECORDSOURCE=“SELECT*FROM 学生表 WHERE 学生表.注册日期=CTOD(ThisForm.Text1.Value)INTO CURSOR XX ORDER BY 学生表.年龄 DESC“ * 步骤 4：输入“退出”按钮的 Click 事件代码为“ThisForm.Release”。 步骤 5：保存并按要求运行表单。 答案考生文件夹
