首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
建立一个文件名和表单名均为myfom的表单文件,表单上有:表格控件grid1(RecordSourceType属性手工设置为“别名”),文本框控件Text1,命令按钮控件Command1(文本为“确定”)。 程序运行时在文本框中输入“部门名”,然后
建立一个文件名和表单名均为myfom的表单文件,表单上有:表格控件grid1(RecordSourceType属性手工设置为“别名”),文本框控件Text1,命令按钮控件Command1(文本为“确定”)。 程序运行时在文本框中输入“部门名”,然后
admin
2016-12-05
50
问题
建立一个文件名和表单名均为myfom的表单文件,表单上有:表格控件grid1(RecordSourceType属性手工设置为“别名”),文本框控件Text1,命令按钮控件Command1(文本为“确定”)。
程序运行时在文本框中输入“部门名”,然后单击“确定”命令按钮计算该部门各年度的“销售额”(合计)和“利润”(合计) (利润为“销售额-工资额”),按“年度”升序将结果(含“年度”、“销售额”和“利润”3个字段)保存在以“部门名”命名的dbf文件的同时,在Grid1控件中显示计算的结果。如图2—23所示。
要求:程序完成后必须运行,并分别计算“笔记本产品部”和“计算机产品部”按年度的销售额和利润情况。
选项
答案
【操作步骤】 步骤1:命令窗口执行:CREATE FORM myform,打开表单设计器新建表单。向表单添加一个文本框、一个表格和一个命令按钮控件。 步骤2:修改对象属性值,见表3—26。 [*] 步骤3:双击“确定”命令按钮(Command1)编写Click事件代码。 *****“确定”按钮的Click事件代码***** 1 BM=ALLTRIM(THISFORM.TEXT1.VALUE) 2 SELECT Sell.年度,SUM(Sell.销售额) AS 销售额,; 3 SUM(Sell.销售额-Sell.工资额) AS利润; 4 FROM TEST_DB!Dept INNER JOIN TEST_DB!Sell; 5 ON Dept.部门号=Sell.部门号; 6 WHERE Dept.部门名=BM; 7 GROUP BY Sell.年度; 8 ORDER BY Sell.年度; 9 INTO TABLE &BM 10 THISFORM.GRID1.RECORDSOURCE=BM 步骤4:单击“常用”工具栏中的“运行”按钮运行表单,并生成“笔记本产品部”和“计算机产品部”两个表,将表单文件保存到考生文件夹下。
解析
转载请注明原文地址:https://kaotiyun.com/show/ZNIp777K
本试题收录于:
二级VF题库NCRE全国计算机二级分类
0
二级VF
NCRE全国计算机二级
相关试题推荐
数据库系统的核心是()。
SQL的SELECT语句中,用来定义一个区间范围的特殊运算符是()。
下列有关数据库的描述,正确的是()。
在VisualFoxPro中,执行SQL的DELETE命令和传统的非SQLDELETE命令都可以删除数据库表中的记录,下面对它们正确的描述是()。
在VisualFoxPro中,根据变量的作用域来分,内存变量可分为()。
数据库系统在其内部具有3级模式,用来描述数据库中全体数据的全局逻辑结构和特性的是()。
假设同一名称的产品有不同的型号和产地,则计算每种产品平均单价的SQL语句是()。
为“客户”表建立普通索引,要求按“客户号”字段升序排列,如果客户号(C,4)相等,则按“订购日期”(D)升序排列,下列语句正确的是()。
随机试题
油气分离器一般采用的工作原理有几种?其中离心分离原理是什么?
26岁孕妇,第一胎,停经38周,孕期经过顺利,近一周突觉头昏、眼花、视物模糊。首先做的处置应是
下列何种股骨颈骨折最容易发生股骨头坏死
小便热涩刺痛,尿色紫红,甚则夹有血块,舌苔黄,脉滑数,应诊断为
特种设备安装、改造、维修的施工单位应当在施工前进行书面告知,书面告知应提交的材料有()等。
王某和张某是两个刚刚从事会计工作的年轻人,对相关财经法规不够熟悉。2013年10月10日,王某向张某签发了一张16000元的转账支票以及一张1200元的现金支票,王某在签发支票时使用普通的蓝色水笔填写,并且没有签章。张某将16000元的转账支票交给银行,银
在用平均年限法计提固定资产折旧时,下列说法正确的有()。
由我国学者王大耜于1977年提出的“六届分类系统”,是在“五界分类系统”的基础上增加了()。
关于社会主义的发展阶段,毛泽东指出:社会主义这个阶段,可能分为
Thebesttitleforthepassageis______.The1992LosAngelesriotsbrokeoutbecause______.
最新回复
(
0
)