首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
建立一个文件名和表单名均为myform的表单文件,表单上有:表格控件gridl(RecordSourceType属性手工设置为“别名”),文本框控件Text1,命令按钮控件Command1(文本为“确定”)。 程序运行时在文本框中输入“部门名”,然
建立一个文件名和表单名均为myform的表单文件,表单上有:表格控件gridl(RecordSourceType属性手工设置为“别名”),文本框控件Text1,命令按钮控件Command1(文本为“确定”)。 程序运行时在文本框中输入“部门名”,然
admin
2015-08-20
56
问题
建立一个文件名和表单名均为myform的表单文件,表单上有:表格控件gridl(RecordSourceType属性手工设置为“别名”),文本框控件Text1,命令按钮控件Command1(文本为“确定”)。
程序运行时在文本框中输入“部门名”,然后单击“确定”命令按钮计算该部门各年度的“销售额”(合计)和“利润”(合计)(利润为“销售额一工资额”),按“年度”升序将结果(含“年度”、“销售额”和“利润”3个字段)保存在以“部门名”命名的dbf文件的同时,在Grid1控件中显示计算的结果。如图2.23所示。
要求:程序完成后必须运行,并分别计算“笔记本产品部”和“计算机产品部”按年度的销售额和利润情况。
选项
答案
步骤1:命令窗口执行:
CREATE FORM myform
,打开表单设计器新建表单。向表单添加一个文本框、一个表格和一个命令按钮控件。 步骤2:修改对象属性值,见表3.26。 [*] 步骤3:双击“确定”命令按钮(Command1)编写Click事件代码。 *****“确定”按钮的Click事件代码***** BM=ALLTRIM(THISFORM.TEXT1.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.GRID1.RECORDSOURCE=BM 步骤4:单击“常用”工具栏中的“运行”按钮运行表单,并生成“笔记本产品部”和“计算机产品部”两个表,将表单文件保存到考生文件夹下。
解析
本题考查了表单及控件的常用属性和方法的设置;SQL分组与计算查询。
由于本题限制了表格的数据源类型为“1-别名”,因此,可以先将查询结果输出到表中,然后再通过表格的RecordSource属性指定数据源,完成表格数据的显示。
本题关键是SQL查询语句中怎样将文本框中显示的“部门名”命名为表名,解决此问题的方法就是先定义一个变量等于文本框中的数据,然后使用宏替换函数(&)将变量值替换出来,替换出来的数据都是当前文本框显示的值。
本题可利用SUM()函数进行计算,GROUP BY分组,ORDER BY排序,表Dept表和Sell表:联接字段为“部门号”。
转载请注明原文地址:https://kaotiyun.com/show/SXEp777K
本试题收录于:
二级VF题库NCRE全国计算机二级分类
0
二级VF
NCRE全国计算机二级
相关试题推荐
有如下程序:INPUTTOAIFA=10S=0ENDIFS=1?S假定从键盘输入的A的值一定是数值型,那么程序的执行结果是______。
创建两个具有“多对多”关系的表之间的关联,应当______。
用途:指定需返回数据的范围语法:SELECTcolumn_nameFROMtable_nameWHEREcolumn_nameBETWEENvalue1ANDvalue2
在以下关于索引的说明中,错误的是______。
下列表达式中不符合VisualFoxPro6.0语法要求的是______。
VisualFoxPro6.0的系统配置文件是______。
对图书管理数据库,求共借出多少种图书。请对下面的SQL语句填空:SELECT______ROM借阅
有如下SQL语句:SELECTMAX(人数)FROM班级INTOARRAYtemp执行该语句后()。
随机试题
1990年我国在乌拉圭回合多边贸易谈判中签字的是()
半规管感受直线变速运动。
做直腿抬高试验检查时,当患者下肢抬到以下哪个角度以内出现疼痛时,即为直腿抬高试验阳性
桥梁工程的基本体系可归结为()几种基本体系。
什么是生产成本?什么是工艺成本?
下列关于无形资产的说法中,符合《企业会计准则》规定的有()。
根据《中华人民共和国民法通则》《中华人民共和国继承法》,关于继承开始的说法,正确的是()。
为达到把a、b中的值交换后输出的目的,某人编程如下:PrivateSubCommandlClick()a%=10:b%=20Callswap(a,b)Printa,bEndSu
ItisknowntousthatEnglishisnotasoldasChinese,butitiswidelyusedbymostpeopleallovertheworld.Englishspeake
Smokingisconsidereddangeroustothehealth.Ourtobacco-seller,Mr.Johnson,therefore,alwaysaskshiscustomers,iftheyar
最新回复
(
0
)