2016年计算机二级《VF》上机题及答案
二、综合应用题
11设计一个表单名和文件名均为“bd2”的表单,所有控件的属性必须在表单设计器的属性窗口中设置。表单的标题为“外币市值情况”。表单中有一个文本框、一个表格和两个命令按钮“查询”和“关闭”。
运行表单时,在文本框text1中输入货币代码,然后单击“查询”,则表格中会显示出外汇账户相应的账户信息及持有外币相当于人民币的价值数量。注意,某种外币相当于人民币数量的计算公式:人民币价值数量一该种外币的“买入价”*该种外币的“数量”。
单击“关闭”按钮关闭表单。
参考解析:
【考点指引】本大题主要考查表单的设计,重点是文本框和表格控件的使用和命令按钮事件代码的编写。
【操作步骤】
①选择【文件】→【新建】命令,选择“表单”,单击“新建文件”按钮打开表单设计器,将Caption属性值修改为“外币市值情况”;单击表单控件工具栏上的“文本框”控件图标,为表单添加l个文本框Textl,单击表单控件工具栏上的“命令按钮”
控件图标,为表单添加两个命令按钮Command1和Command2,单击表单控件工具栏上的“表格”控件图标,再添加一个表格控件。
②分别选择两个命令按钮,在按钮属性窗口中将Command1的Caption属性值修改为“查询”、Command2的Caption属性值修改为“关闭”,如图98-1所示。双击“关闭”命令按钮,在Click事件中输入代码:ThisForm Release,用来关闭表单。
③选择表格控件“Grid1”,在表格控件属性窗口中将“RecordSource”属性值修改为“""”,将“RecordSourceType”属性值修改为“1”。
④双击“查询”命令按钮,在Click事件中输入代码:
SELECT*,买入价*数量AS价值INTO CURSOR tmp FROM外汇账户WHERE货币代码=ThisForm.Textl.Value
ThisForm.Grid1.RecordSourceType=1
ThisForm.Grid1.RecordSource="tmp"
ThisForm.Grid1.Refresh
⑤选择【表单】→【执行表单】命令,系统首先要求保存该表单文件,在弹出的“另存为”对话框中输入表单文件名“bd2”,保存在考生文件夹下,然后运行表单。
12在考生文件夹下有“住宿管理”数据库,其中包含表“宿舍”和表“学生”。这两个表之间存在一对多的关系。对该数据库建立表单文件,文件名为“bd2”,标题为“住宿管理”,完成如下要求:
(1)在表单中包含两个表格控件,第一个用于显示“宿舍”表中的记录,第二个表格用于显示与“宿舍”表中的当前记录对应的学生表中的记录。
(2)在表单中包含一个“关闭”命令按钮,单击该按钮退出表单。
参考解析:
【考点指引】本大题考查的是表单的设计及表格控件的使用,主要注意表格控件数据源的设置。
【操作步骤】
①选择【文件】→【打开】命令,打开数据库“住宿管理”。
②选择【文件】→【新建】命令,选择“表单”,单击“新建文件”按钮打开表单设计器,在表单属性窗口中将Caption属性值修改为“住宿管理”。单击表单控件工具栏上的“命令按钮”控件图标,为表单添加一个命令按钮Command1,单击表单控件工具栏上的“表格”控件图标,再添加两个表格控件“Grid1”和“Grid2”。
③选择命令按钮,在按钮属性窗口中将命令按钮Command1的Name属性值修改为“cmdClose”,将Caption属性值修改为“关闭”,如图71-1所示。双击“关闭”命令按钮,在Click事件中输入代码:ThisForm.Release,用来关闭表单。
④在表单设计器中,鼠标右键单击表单空白处,在弹出的快捷菜单中选择“数据环境”命令,打开表单的数据环境,选择数据库“住宿管理”,将数据表文件“宿舍”和“学生”添加到数据环境中。
⑤选择表格控件“Grid1”,在表格控件属性窗口中将“RecordSource”属性值修改为“宿舍”,将“RecordSourceType”属性值修改为“0”,将“ReadOnly”属性值修改为
“.T.”;选择表格控件“Grid2”,在表格控件属性窗口中将“RecordSource”属性值修改为“〝〞”,将“RecordSourceType”属性值修改为“1”。
⑥在表单设计器中,选择“Grid1”,在属性窗口中双击“AfterRowColChange Event”,弹出事件过程代码编辑窗口,输入以下代码:
SELECT学生.*INTO CURSOR trap FROM学生,宿舍WHERE学生.宿舍编号=宿舍.宿舍编号AND宿舍.宿舍编号=ThisForm.Grid1.columns(1).Text1.value
ThisForm.Grid2.RecordSourceType=0
ThisForm.Grid2.RecordSource=〝tmp〞
ThisForm.Grid2.Refresh
⑦选择【表单】→【执行表单】命令,系统首先要求保存该表单文件,在弹出的“另存为”对话框中输入表单文件名“bd2”,保存在考生文件夹下,然后运行表单。
13(1)在考生文件夹下,将“books”表中所有书名中含有“计算机”3个字的图书复制到“books_BAK”表中,以下操作均在“books_BAK”表中完成。
(2)复制后的图书价格在原价格的基础上降低5%。
(3)从图书均价高于25元(含25)的出版社中,查询并显示图书均价最低的出版社名称及均价,查询结果保存在‘new_table4”表中(字段名为出版单位和均价)。
参考解析:
【考点指引】本大题主要考查的知识点是:SQL语句的复制、修改和查询功能。
【操作步骤】
在命令窗Vl中依次输入以下代码,分别完成题目中各个要求。
(1)SELECT*FROMB00KSBAKWHERE书名LIKE“%计算机%”INTOTABLEBOOKS_BAK
(2)UPDATEBOOKS_BAKSET价格=价格*(1-0.05)
(3)SELECTTOPlBOOKS_BAK.出版单位,avg(books_bak.价格)as均价FROMbooks_bakGroupByBooks_bak.出版社HAVING均价>=250RERBY2INTOTABLEnew_table4.dbf。
14(1)请编写名称为CX的程序并执行。该程序实现下面的功能:将工资表进行备份,备份文件名为“b_工资.dbf”。利用“人事部”向“财务部”提供的雇员工资调整表“c_工资”的“工资”,对工资表的‘'工资”进行调整(请注意:按“职员编号”相同进行调整,并且只是部分职员的工资进行了调整,其他职员的工资不动)。最后将工资表中的记录存储到“n_ 工资”表中(表结构与工资表完全相同)。
(2)设计一个文件名为“bd2”的表单,其中包含“调整工资”和“关闭”两个命令按钮。
单击“调整工资”命令按钮时,调用CX命令程序实现工资调整。
单击“关闭”命令按钮时,关闭表单。
注意:在两个命令按钮中均只有一条命令,不可以有多余命令。
参考解析:
【考点指引】本大题第1小题主要考查对数据表的操作,包括表的备份、数据的修改;第2小题考查表单的一些基本操作及按缸控件的使用。
(1)【操作步骤】
在命令窗口中输入命令:MODI COMM cx(回车执行),打开程序文件编辑窗口,在程序文件编辑窗口中输入以下程序代码:
SELECT*INTO TABLE b_工资FROM工资
USE c_工资
Go TOP
DO WHILE.NOT.EOF()
aa=职员编号
bb=工资
UPDATE工资SET工资=bb WHERE职员编号=aa
SELECT C_工资
SKIP
ENDD0
SELECT*INTO TABLE n_工资FROM工资
CLOSE ALL
关闭程序文件编辑窗口并保存程序文件。
(2)【操作步骤】
①选择【文件】→【新建】命令,选择“表单”,单击“新建文件”按钮打开表单设计器,单击表单控件工具栏上的“命令按钮”控件图标,为表单添加两个命令按钮Command1和Command2。
②在按钮属性窗口中将命令按钮Command1的Caption属性值修改为“调整工资”,将命令按钮Command2的Caption属性值修改为“关闭”。
③双击“调整工资”命令按钮,在Click事件中输入代码:DO CX,用来执行工资调整程序。
④双击“关闭”命令按钮,在Click事件中输入代码:ThisForm.Release,用来关闭表单。
⑤选择【表单】→【执行表单】命令,系统首先要求保存该表单文件,在弹出的“另存为”对话框中输入表单文件名“bd2”,保存在考生文件夹下,然后运行表单。
15设计一个名为“mysupply”的表单,表单的控件名和文件名均为“mysupp[y”。表单的形式如图5—1所示。
表单标题为“零件供应情况”,表格控件为Gridl,命令按钮“查询”为Commandl、“退出”为Command2,标签控件Labell和文本框控件Textl(程序运行时用于输入工程号)。
运行表单时,在文本框中输入工程号,单击“查询”命令按钮后,表格控件中显示相应工程所使用的零件的零件名、颜色和重量(通过设置有关“数据”属性实现),并将结果按“零件名”升序排序存储到“PP.dbf”文件中。
单击“退出”按钮关闭表单。
完成表单设计后运行表单,并查询工程号为“J4”的相应信息。
参考解析:
【考点指引】本大题主要考查的知识点是:通过表单设计器创建表单、表单控件及其属性的修改和通过SQL语句实现查询。
【操作步骤】
①选择【文件】→【新建】命令,选择“表单”,单击“新建文件”按钮打开表单设计器,在表单属性窗口中将Caption属性值修改为“零件供应情况”;表单中添加一个表格控件Grid1、两个命令按钮控件Command1、Command2,一个标签控件Label1和一个文本框控件Text1。
②在表单属性窗口中将Label1、Command1、Command2的Caption属性值修改为“工程号”、“查询”、“退出”。
③双击“查询”命令按钮,在Click事件中输入代码:
Select零件.零件名as零件名,零件.颜色as颜色,零件.重量as重量
From供应,零件
Where零件.零件号=供应.零件号and供应.工程号=thisform.Text1.value
Order By零件名 ’
Into dbf PP
ThisForm.Grid1.RecordSource=〝PP〞
④双击“退出”命令按钮,在Click事件中输入代码:thisform.release
⑤选择【表单】→【执行表单】命令,系统首先要求保存该表单文件,在弹出的“另存为”对话框中输入表单文件名“mysupply”,保存在考生文件夹下,然后运行表单。
【2016年计算机二级《VF》上机题及答案】相关文章: