二、基本操作题

在考生文件夹下，打开“TEST_DB”数据库，完成如下操作：

1. 为表SELL建立一个主索引，索引名为PK，索引表达式为:

部门号+年度+月份。

2. 将自由表DataTest、MODEL、TABC和PASS添加到当前打开的数据库中;

3. 在当前数据库中创建表TEST(部门号，年份，销售额合计)，其中：部

门号为字符型，宽度为2;年份为字符型，宽度为4;销售额合计为数值型，宽

度为8(其中小数2位)。

4. 使用报表向导建立一个简单报表，要求选择表SELL中所有字段(其他不做

要求)，报表文件名为TWO。

解题思路：略

三、简单应用题

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

1. 打开“TEST_DB”数据库，根据表DEPT和表SELL并使用查询设计器设计一个名称为THREE的查询，按年度分部门(按年度和部门分组)统计月平均销售(通过销售额计算)、月平均工资(通过工资额计算)和月平均利润(通过"月平均销售-月平均工资"计算)。查询统计结果按部门号、年度升序排序，并将查询结果输出到表TABB中。表TABB的字段名依次为：部门号、部门名、年度、月平均销售、月平均工资、月平均利润。设计完成后，运行该查询。

解题思路：

1. 建立查询---添加表“dept”和表“sell”---单击“字段”选项卡，选择试题要求的字段“部门号”、“部门名”和“年度”添加到“选定字段”列表框中，在“函数和表达式”下的文本框输入“AVG(销售额) AS 月平均销售”，单击“添加”按钮。在“函数和表达式”下的文本框输入“AVG(工资额) AS 月平均工资”，单击“添加”按钮。在“函数和表达式”下的文本框输入“AVG(销售额)-AVG(工资额) AS 月平均利润”，单击“添加”按钮---单击“排序依据”选项卡，选择“Dept.部门号”并选择“升序”，再选择“Sell.年度”并选择“升序”---单击“分组依据”选项卡，选择“Dept.部门号”，单击“添加”按钮，再选择“Sell.年度”，以“部门号和年度”为分组条件。(这一步不能漏做，否则结果将不正确)---单击“查询输出去向”菜单项，在“查询去向”对话框中，单击“表”按钮，在“表名”处输入“tabb“---保存该查询并运行。

*********************************

2. 打开文件名为“testA”的表单。该表单完成如下功能：

每当用户输入用户名和口令并按“确认”按钮后，利用表PASS中记录检查其输入是否正确，若正确，就显示“欢迎使用本系统!”字样，并关闭表单;若不正确，则显示"用户名或口令不对，请重输入!"字样;如果三次输入不正确，就显示“用户名或口令不对，登录失败!”字样，并关闭表单。

(1) 修改口令输入文本框，使输入的口令显示为“*”。

(2) 修改该表单“确认”按钮的Click事件中的程序。请将第3、4和12行语句修改正确。修改时不允许增加或删除行，只能在错误行上进行修改。

解题思路：

2.选中Text2，在其“属性”的PasswordChar处输入“*”。

第2行：应改为：Key2=ALLTRIM(ThisForm.Text1.Value)

第3行：应改为：Key2=ALLTRIM(ThisForm.Text2.Value)

第4行：应改为：LOCATE ALL FOR USER=Key1

第7行：应改为：ThisForm.Release

第12行：所以也应改为：ThisForm.Release

四、综合应用题

建立一个文件名和表单名均为myform的表单文件，表单上有：

. 表格控件grid1(RecordSourceType属性手工设置为“别名”)

. 文本框控件Text1

. 命令按钮控件Command1(文本为“确定”)

程序运行时在文本框中输入部门名,然后单击“确定”命令按钮计算该部门各年度的销售额(合计)和利润(合计)(利润为“销售额-工资额”)，按年度升序将结果(含年度、销售额和利润3个字段)保存在以部门名命名的dbf文件的同时，在

Grid1控件中显示计算的结果。

要求：程序完成后必须运行，并分别计算"笔记本产品部"和"计算机产品部"

按年度的销售额和利润情况。

解题思路：

1.建立表单，在“表单设计器”中，在其“属性”的Name处输入“myform”。在“表单设计器”中，分别添加一个文本框Text1和表格Grid1。在“表单设计器”中，添加一个命令按钮Command1，在其命令按钮的“属性”的Caption处输入“确定”。双击“确定”按钮，在“Command1.Click”编辑窗口中输入下列程序

dn=thisform.text1.value

SELECT Sell.年度, SUM(Sell.销售额) 销售额,;

SUM(Sell.销售额)- SUM(Sell.工资额) 利润;

FROM sell where 部门号 in;

(select 部门号 from dept where 部门名=dn);

GROUP BY Sell.年度 into dbf &dn

thisform.grid1.recordsource=dn

[计算机二级考试《VFP》模拟试题及答案2017]相关文章：