二级 Visual FoxPro_第34套上机题.docVIP

二级 Visual FoxPro_第34套上机题 一、基本操作题 在考生文件夹下，打开TEST_DB数据库，完成如下操作： 1．为表SELL建立一个名为PK的主索引，索引表达式为：部门号＋年度＋月份。 2．将DataTest、MODEL、TABC和PASS四个自由表添加到当前打开的数据库中。 3．在当前数据库中创建表TEST，包括部门号、年份和销售额合计3个字段，其中： 　部门号　　C(2) 　年份 　　 C(4) 　销售额　　N(8,2) 4．使用报表向导建立一个简单报表，要求选择表SELL中的所有字段(其他不做要求)，报表文件名为TWO。 【操作步骤】 (1)打开TEST_DB数据库，选中表SELL，在表设计器中的索引页，输入索引名为PK，索引表达式为：部门号+年度+月份，索引类型为“主索引”。 (2)在数据库设计器中按题目要求单击右键添加表。 (3)在数据库中新建一个表TEST，按题目要求输入字段。 (4)通过报表向导新建一个报表，在报表的字段选取对话框中将SELL表中的全部字段添加到选定字段列表框中；其他各项均取默认值，直接单击下一步或完成按钮。最后将报表以TWO为文件名进行保存。 二、简单应用题 在考生文件夹下，完成如下简单应用： 1．打开TEST_DB数据库，根据表DEPT和表SELL，使用查询设计器设计一个名为THREE的查询，按年度、分部门(按年度和部门分组)统计月平均销售(通过销售额计算)、月平均工资(通过工资额计算)和月平均利润(通过月平均销售－月平均工资计算)。查询结果按部门号和年度升序排列，并将查询结果输出到表TABB中。表TABB的字段名依次为：部门号、部门名、年度、月平均销售、月平均工资、月平均利润。设计完成后，运行该查询。 2．打开名为testA的表单。该表单完成如下功能： 每当用户输入用户名和口令并按确认按钮后，利用表PASS中的记录检查其输入是否正确，若正确，就显示欢迎使用本系统！字样，并关闭表单；若不正确，则显示用户名或口令不对，请重输入！字样；如果3次输入不正确，就显示用户名或口令不对，登录失败！字样，并关闭表单。 (1)修改口令输入文本框，使输入的口令显示为*。 (2)修改确认按钮的Click事件中的程序。请将第3、4和12行语句修改正确。修改时不能增加或删除行，只能在错误行上进行修改。 【解题思路】 在第2,,,,题中，由题意知，变量Key1和变量Key2用于存放在Text1和Text2两个文本框中输入的数据；第4行的语句用于对用户的身份进行查找，所以应该用LOCATE…FOR命令语句；第12行的语句是在与其对应的IF语句的条件满足的条件下执行的，其条件是3次输入不正确，因此此处应该是退出表单的语句。 (1)【操作步骤】 步骤1：打开TEST_DB数据库，使用查询设计器建立查询。 步骤2：将DEPT和SELL表添加到查询设计器中。 步骤3：在查询设计器下方的字段选项卡中选中并添加字段部门号、部门名和年度，在函数和表达式的表达式中输入AVG(Sell.销售额) AS 月平均销售、 AVG(Sell.工资额) AS 月平均工资和AVG(Sell.销售额-Sell.工资额) AS 月平均利润并添加这些表达式。 步骤4：在排序依据选项卡中选择Dept.部门号和Sell.年度字段升序排列，在分组依据选项卡中选择Sell.年度和Dept.部门号字段分组。 步骤5：单击菜单栏上的查询→查询去向命令，在弹出的查询去向对话框中选择表，并在表名处输入表名TABB。 步骤6：单击工具栏上的保存按钮，输入查询文件名THREE.qpr，保存查询后运行该查询。 (2)【操作步骤】 步骤1：打开表单，修改Text2的PasswordChar属性赋值为*，使用户在输入口令时显示*。 步骤2：修改该表单确认按钮的Click事件中的程序如下。 第3行处的错误修改为：Key2 = ALLTRIM(ThisForm.text2.value) 第4行处的错误修改为：LOCATE ALL FOR USER = Key1 第12行处的错误修改为：THISFORM.RELEASE 三、综合应用题 建立一个文件名和表单名均为myform的表单文件，向表单中添加以下控件： (1)表格控件grid1，并将其RecordSourseType属性手工设置为别名。 (2)文本框控件Text1。 (3)命令按钮控件Command1，名称为确定。 程序运行时，在文本框中输入部门名，然后单击确定命令按钮，计算该部门各年度的销售额(合计)和利润(合计)(利润为销售额－工资额)，按年度升序将结果(含年度、销售额和利润3个字段)保存在以部门名命名的表文件中，同时在Grid1控件中显示计算的结果。 要求：程序完成后必须运行，并分别计算笔记本产品部和计算机