首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
建立一个文件名和表单名均为myform的表单文件,向表单中添加以下控件: (1)表格控件grid1,并将其RecordSourseType属性手工设置为"别名"。 (2)文本框控件Text1。 (3)命令按钮控件Command1,名称为"确定"。 程序运行
建立一个文件名和表单名均为myform的表单文件,向表单中添加以下控件: (1)表格控件grid1,并将其RecordSourseType属性手工设置为"别名"。 (2)文本框控件Text1。 (3)命令按钮控件Command1,名称为"确定"。 程序运行
admin
2013-08-29
63
问题
建立一个文件名和表单名均为myform的表单文件,向表单中添加以下控件:
(1)表格控件grid1,并将其RecordSourseType属性手工设置为"别名"。
(2)文本框控件Text1。
(3)命令按钮控件Command1,名称为"确定"。
程序运行时,在文本框中输入部门名,然后单击"确定"命令按钮,计算该部门各年度的销售额(合计)和利润(合计)(利润为"销售额-工资额"),按年度升序将结果(含年度、销售额和利润3个字段)保存在以部门名命名的表文件中,同时在Grid1控件中显示计算的结果。
要求:程序完成后必须运行,并分别计算"笔记本产品部"和"计算机产品部"按年度统计的销售额和利润情况。
选项
答案
【操作步骤】 步骤1:通过"新建"对话框新建一个表单,文件名为myform。 步骤2:按题目的要求为表单添加一个表格控件、一个文本框控件和一个命令按钮控件,设置表单的Name属性为myform,表格控件的RowSourceType属性为"1-别名",RowSource属性为sell,命令按钮的Caption属性为"确定"。 步骤3:在"确定"按钮的Click事件代码中输入下列代码。 ******"确定"按钮的Click事件代码****** x="SELECT Sell.年度, sum(Sell.销售额) as 销售额,sum(Sell.销售额 - Sell.工资额) as 利润" x=x+" FROM test_db!sell where 部门号 in (select 部门号 FROM DEPT.DBF WHERE 部门名=’"+myform.text1.value+"’)" x=x+" GROUP BY Sell.年度" x=x+" ORDER BY Sell.年度" x=x+" INTO TABLE "+myform.text1.value &x myform.Grid1.recordsource=myform.text1.value ************************************ 步骤4:保存后,按题目要求输入相应各部门名运行此表单。
解析
新建表单,按要求添加控件并修改属性和方法,写入命令按钮的代码。
转载请注明原文地址:https://kaotiyun.com/show/XJop777K
本试题收录于:
二级VF题库NCRE全国计算机二级分类
0
二级VF
NCRE全国计算机二级
相关试题推荐
在VisualFoxPro中,打开一个名为GRADE的数据库,应使用命令
以下不属于容器控件的是()。
用于实现数据库各种数据操作的软件称为()。
面向数据流的设计方法是把【】映射成软件结构。
把对象的数据和相应的方法程序、属性、事件代码捆绑包装在一起,就称为【】。
有下列SQLSELECT语句:SELECT*FROM工资表WHERE基本工资<=3000AND基本工资>=1000下列与该语句等价的是()。
打开一个数据库的命令是()。
数据库的逻辑结构设计阶段的主要内容是将E-R模型中的实体和【】转换为关系模式。
打开表并设置当前有效索引(相关索引已建立)的正确的命令是______。
随机试题
在今天的市场活动中,包装作为营销策略中的重要因素有哪些作用?
简述机械性肠梗阻和麻痹性肠梗阻的鉴别要点。
有8个某种传染病患者,他们的潜伏期分别为5、2、21、8、12、15、9、13,其中位数是
宫缩乏力性出血的诊断要点中错误的是
试分析商法与民法经济法的相互关系。
卖出套利若价差缩小,则在价格上涨的情况下能够盈利,价格下跌的情况下会亏损。()
企业采用固定股利支付率的股利政策,其结果可能有()。
根据以下资料,回答题。下列分析不正确的有()。(1)普通高等教育本专科招生数占图中三类教育招生总数的比重逐年增加(2)图中三类教育招生总数增加幅度逐年减小(3)2005--2009年普通高等教育本专科与中等职业教育招生
根据套利定价理论,下列买入一个套利组合的方式正确的是()。
在建设中国特色社会主义的新时期,我国社会主义道德建设的核心是()
最新回复
(
0
)