2. 计算机
  3. 建立一个文件名和表单名均为myform的表单文件，表单上有：表格控件gridl（RecordS．ourceType属性手工设置为“别名”），文本框控件Textl，命令按钮控件Commandl（文本为“确定”）。 程序运行时在文本框中输入“部门名”，然后单击

建立一个文件名和表单名均为myform的表单文件，表单上有：表格控件gridl（RecordS．ourceType属性手工设置为“别名”），文本框控件Textl，命令按钮控件Commandl（文本为“确定”）。 程序运行时在文本框中输入“部门名”，然后单击

admin2017-03-29  33
问题 建立一个文件名和表单名均为myform的表单文件，表单上有：表格控件gridl（RecordS．ourceType属性手工设置为“别名”），文本框控件Textl，命令按钮控件Commandl（文本为“确定”）。
程序运行时在文本框中输入“部门名”，然后单击“确定”命令按钮计算该部门各年度的“销售额”（合计）和“利润”（合计）（利润为“销售额一工资额”），按“年度”升序将结果（含“年度”、“销售额”和“利润”3个字段）保存在以“部门名”命名的dbf文件的同时，在Gridl控件中显示计算的结果。如图3-32所示。

要求：程序完成后必须运行，并分别计算“笔记本产品部”和“计算机产品部”按年度的销售额和利润情况。
选项
答案步骤1：命令窗口执行： CREATE FORM myform，打开表单设计器新建表单。向表单添加一个文本框、一个表格和一个命令按钮控件。 步骤2：修改对象属性值，见表4—43。 [*] 步骤3：双击“确定”命令按钮（Command1）编写Click事件代码。 *****“确定”按钮的Click事件代码***** BM=ALLTRIM (THISFORM．TEXTl．VALUE) SELECT Sell．年度，SUM（Sell．销售额）AS销售额，； SUM（Sell．销售额=Sell．工资额）AS利润； FROM TEST DB! Dept INNER JOIN TEST DB! Sell； ON Dept．部门号=Sell．部门号； WHERE Dept．部门名=BM； GROUP BY Sell*年度； ORDER BY Sell．年度； INTO TABLE ＆BM THISFORM． GRIDl． RECORDS OURCE=BM 步骤4：单击“常用”工具栏中的“运行”按钮运行表单，并生成“笔记本产品部”和“计算机产品部”两个表，将表单文件保存到考生文件夹下。 表单的事件、方法和属性；SQL分组与计算查询。
解析 本题考查了表单及控件的常用属性和方法的设置；SQL分组与计算查询。
由于本题限制了表格的数据源类型为“1—别名”，因此，可以先将查询结果输出到表中，然后再通过表格的RecordSource属性指定数据源，完成表格数据的显示。
本题关键是SQL查询语句中怎样将文本框中显示的“部门名”命名为表名，解决此问题的方法就是先定义一个变量等于文本框中的数据，然后使用宏替换函数(＆)将变量值替换出来，替换出来的数据都是当前文本框显示的值。
本题可利用SUM()函数进行计算，GROUP BY分组，ORDER
BY排序，表Dept表和Sell表联接字段为“部门号”。
转载请注明原文地址:https://kaotiyun.com/show/keIp777K
本试题收录于： 二级VF题库NCRE全国计算机二级分类
0

二级VF

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)