2013年计算机二级考试VF精选试题及答案6

　　一、基本操作题（共4小题，第1和2题是7分、第3和4题是8分）
　　在考生文件夹下，打开"TEST_DB"数据库，完成如下操作：
　　1. 为表SELL建立一个主索引，索引名为PK，索引表达式为：部门号+年度+月份。
　　2. 将自由表DataTest、MODEL、TABC和PASS添加到当前打开的数据库中；
　　3. 在当前数据库中创建表TEST（部门号，年份，销售额合计），其中：部门号为字符型，宽度为2；年份为字符型，宽度为4；销售额合计为数值型，宽度为8（其中小数2位）。
　　4. 使用报表向导建立一个简单报表，要求选择表SELL中所有字段（其他不做要求），报表文件名为TWO。
　　二、简单应用（2小题，每题20分，计40分）
　　1. 打开"TEST_DB"数据库，根据表DEPT和表SELL并使用查询设计器设计一个名称为THREE的查询，按年度统计各部门的月平均销售（通过销售额计算）、月平均工资（通过工资额计算）和月平均利润（通过"月平均销售-月平均工资"计算）。查询统计结果按部门号、年度升序排序，并将查询结果输出到表TABB中。表TABB的字段名依次为：部门号、部门名、年度、月平均销售、月平均工资、月平均利润。设计完成后，运行该查询。
　　2. 打开文件名为"testA"的表单。该表单完成如下功能： 每当用户输入用户名和口令并按"确认"按钮后，利用表PASS中记录检查其输入是否正确，若正确，就显示"欢迎使用本系统！"字样，并关闭表单；若不正确，则显示"用户名或口令不对，请重输入！"字样；如果三次输入不正确，就显示"用户名或口令不对，登录失败！"字样，并关闭表单。(1) 修改口令输入文本框，使输入的口令显示为"*"。(2) 修改该表单"确认"按钮的Click事件中的程序。请将第2、3、4、7和12行语句修改正确。修改时不允许增加或删除行，只能在错误行上进行修改。
　　三、综合应用（1小题，计30分）
　　建立一个文件名和表单名均为myform的表单文件，表单上有：表格控件grid1（RecordSourceType属性手工设置为"别名"）；文本框控件Text1；命令按钮控件Command1（文本为"确定"）。程序运行时在文本框中输入部门名，然后单击"确定"命令按钮计算该部门各年度的销售额（合计）和利润（合计）（利润为"销售额-工资额"），按年度升序将结果（含年度、销售额和利润3个字段）保存在以部门名命名的dbf文件的同时，在Grid1控件中显示计算的结果。要求：程序完成后必须运行，并分别计算"笔记本产品部"和"计算机产品部"按年度的销售额和利润情况。
　　简单应用题答案：
　　1、新加如下三个表达式：avg(销售额) as 月平均销售,avg(工资额) as 月平均工资,avg(销售额-工资额) as 月平均利润
　　2、(1) 通过设置PassWordChar属性可实现文本框中的数据以“*”方式显示
　　(2) 第2、3行分别改为：ThisForm.Text1.Value 和ThisForm.Text2.Value，第4行“list all while”改为“locate all for”。
　　第7行“exit”改为“thisform.release”，第12行“loop”改为“thisform.release”。
　　综合应用题答案：“确定”命令按钮的CLICK事件代码为：
　　x="SELECT 年度,sum(销售额) as 销售额,sum(销售额-工资额) as 利润"
　　x=x+" FROM sell where 部门号 in (select 部门号 FROM DEPT WHERE 部门名='"+myform.text1.value+"')"
　　x=x+" GROUP BY 年度"
　　x=x+" ORDER BY 年度"
　　x=x+" INTO TABLE "+myform.text1.value
　　&x
　　myform.Grid1.recordsource=myform.text1.value