设计一个名为“bd2”的表单,表单的标题为“零件装配情况”。表单中有一个表格控件和两个命令按钮“查询”和“关闭”。运行表单时,单击“查询”命令按钮后,要求表格中显示产品编号“0003”所使用的零件的零件名称、规格和数量。单击“关闭”按钮关闭表单。
第1题:
设计文件名为“bd2”的表单。表单的标题为“采购金额统计”。表单中有一个选项组控件和两个命令按钮:“排序”和“关闭”。其中,选项组控件有两个按钮“升序”和“降序”。
运行表单时,在选项组控件中选择“升序”或“降序”,单击“排序”命令按钮,查询“采购信息”表中每个职工采购的总金额(用数量乘以商品表中的价格),查询结果中包括“职工编号”、“职工姓名”和“总金额”,并按“总金额”升序或降序(根据选顶组控件)将查询结果分别存入表“table1”和表“table2”中。
单击“关闭”按钮关闭表单。
【考点指引】本大题考查了表单设计,主要考查选项组、命令按钮控件的使用,重点是命令按钮事件代码的鳊写。
【操作步骤】
①选择【文件】→【新建】命令,选择“表单”,单击“新建文件”按钮打开表单设计器,在表单属性窗口中将Caption属性值修改为“采购金额统计”,单击表单控件工具栏上的“选项按钮组”控件图标,为表单添加一个选项按钮组OptionGroup1,单击表单控件工具栏上的“命令按钮”控件图标,为表单添加两个命令按钮Command1和Command2。
②选择选项按钮组0ptionGroup1,单击右键,在弹出的快捷菜单中选择“生成器”打开选项按钮组生成器对话框,单击“按钮”选项卡,设置按钮的数目为“2”,在“标题”列下修改两个按钮的标题分别为“升序”和“降序”,单击“确定”按钮关闭命令组生成器对话框。
③分别选择两个命令按钮,在按钮属性窗口中将Command1的Caption属性值修改为“排序”,Command2的Caption属性值修改为“关闭”,如图88-1所示。双击“关闭”命令按钮,在Click事件中输入代码:ThisForm.Release,用来关闭表单。
④双击“排序”命令按钮,在Click事件中输入代码:
DO CASE
CASE ThisForm.OptionGroup1.value=1
SELECT员工信息.职工编号,员工信息.姓名,
SUM(数量*价格)AS总金额INTO TABLE ta
blel FROM采购信息,员工信息,商品信息
WHERE采购信息.职工编号=员工信息.职工编
号AND采购信息.商品编号=商品信息.商品编
号GROUP BY员工信息.职工编号ORDER BY
总金额
SELECT*FROM table1
CASE ThisForm.OptionGroup1.value=2
SELECT员工信息.职工编号,员工信息.姓名,
SUM(数量*价格)AS总金额INTO TABLE ta-
ble2 FROM采购信息,员工信息,商品信息
WHERE采购信息.职工编号=员工信息.职工编
号AND采购信息.商品编号=商品信息.商品编
号GROUP BY员工信息.职工编号ORDER BY
总金额DESC
SELECT*FROM table2
ENDCASE
⑤选择【表单】→【执行表单】命令,系统首先要求保存该表单文件,在弹出的“另存为”对话框中输入表单文件名“bd2”,保存在考生文件夹下,然后运行表单。
第2题:
“销售”数据库中含有两个数据库表“商品信息”和“销售汇总”。对“销售”数据库设计一个表单“bd3”,表单的标题为“商品销售汇总”,表单中有标题为“请选择商品”标签和用于选择“商品编号”的组合框及“查询”和“关闭”两个命令按钮,表单中还有一个表格控件。
表单运行时,用户在组合框中选择“商品编号”,单击“查询”按钮,在表单上的表格控件显示查询该商品的“商品编号”、“商品名称”、“年度”、“数量”和“金额”。
单击“关闭”按钮,关闭表单。
【考点指引】本大题考查的是表单的设计及表格控件和组合框的使用,主要注意表格控件数据源的设置。
【操作步骤】
①选择【文件】→【新建】命令,选择“表单”,单击“新建文件”按钮打开表单设计器,在表单属性窗口中将“Caption”属性值修改为“商品销售汇总”。单击表单控件工具栏上的“标签”控件图标,为表单添加~个标签Label1,单击表单控件工具栏上的“组合框”控件图标,为表单添加一个组合框Com-bol,单击表单控件工具栏上的“命令按钮”控件图标,为表单添加两个命令按钮Command1和Command2,单击表单控件工具栏上的“表格”控件图标,添加一个表格控件Grid1。
②选择标签Label1,在标签属性窗口中将Caption属性值修改为“请选择商品”,分别选择命令按钮,将Command1的Caption属性值修改为“查询”,将Command2的Caption属性值修改为“关闭”,如图90-1所示。双击“关闭”命令按钮,在Click事件中输入代码:ThisForm.Release,用来关闭表单。
③选择表格控件“Grid1”,在表格控件属性窗口中将“ReeordSource”属性值修改为“""”,将“RecordSourceType”属性值修改为“1”。
④选择组合框,在组合框属性窗口中双击“Init Event”,打开Init事件代码编辑窗口,输入以下过程代码:
SELECT*INTO ARRAY aa FROM商品信息
FOR i=1 TO ALEN(aa)/2
ThisForm.Comb01.Addltem(aa(i,1))
NEXT
⑤双击“查询”命令按钮,打开Click事件代码编辑窗口,输入以下过程代码:
SELECT商品信息.商品编号,商品名称,年度,数量,
金额INTO CURSOR tmp FROM商品信息,销售汇总
WHERE商品信息.商品编号=销售汇总.商品编号
AND商品信息.商品编号=ThisForm.Comb01.dis-
playvalue
ThisForm.Grid1.RecordSourceType=1
ThisForm.Grid1.RecordSource="trap"
ThisForm.Grid1.Refresh
⑥选择【表单】→【执行表单】命令,系统首先要求保存该表单文件,在弹出的“另存为”对话框中输入表单文件名 “bd3”,保存在考生文件夹下,然后运行表单。
第3题:
在考生文件夹下设计名为supper的表单(表单名和文件名均为supper),表单的标题为“零件供应情况”。表单中有1个表格控件和2个命令按钮查询和退出。
运行表单时单击查询命令按钮后,表格控件中显示“供应”表工程号为“A1”所使用的零件的“零件名”、“颜色”、和“重量”。并将结果放到表jie中。
单击“退出”按钮关闭表单。
第4题:
设计名为“bd1”的表单。表单标题为“学习情况浏览”。表单中有一个选项组控件、一个表格、两个命令按钮“成绩查询”和“关闭”。其中,选项组控件有两个按钮“升序”和“降序”。根据选择的选项组控件,将选修了“VFP入门”的学生的“学号”、“姓名”和“成绩”按成绩排序显示到表格中并存入“result.dbf”文件中。
第5题:
对考生文件夹下的“产品”数据库及其中的“产品”表和“零件”表建立如下表单:设计名为“bd2”的表单。表单的标题为“零件装配情况”。表单中有一个表格控件和两个命令按钮“查询”和“关闭”。运行表单时,单击“查询”命令按钮后,表格控件中显示了使用零件编号为“000005”的产品的所有信息。单击“关闭”按钮关闭表单。
第6题:
设计一个文件名和表单名均为“bdl”的表单。表单的标题为“外汇持有情况”。表单中有一个选项按钮组控件、一个表格控件及两个命令按钮“查询”和“关闭”。其中,选项按钮组控件有3个按钮“美元”、“英镑”和“港币”。运行表单时,在选项组控件中选择“美元”、“英镑”和“港币”,单击“查询”命令按钮后,根据选项组控件的选择将“外汇账户”表的情况显示在表格控件中。单击“关闭”按钮,关闭并释放表单。
第7题:
设计名为mysupply的表单(表单的控件名和文件名均为mysupply)。表单的标题为“零件供应情况”。表单中有一个表格控件和两个命令按钮“查询”(名称为Command1)和“退出” (名称为Command2)。
运行表单时,单击“查询”命令按钮后,表格控件(名称grid1)中显示了工程号“J4”所使用的零件的零件名、颜色和重量。
单击“退出”按钮关闭表单。
第8题:
“sale”数据库中含有两个数据库表:“购买信息”和“会员信息”。对“sale”数据库设计一个表单“bd2”。表单的标题为“会员购买统计”。表单左侧有标题为“请选择会员”标签和用于选择“会员编号”的组合框以及“查询”和“关闭”两个命令按钮。表单中还有一个表格控件。表单运行时,用户在组合框中选择“会员编号”,单击“查询”按钮,在表单上的表格控件显示查询该会员的“会员编号”、“姓名”“年度”和所购买的商品的“购买金额”。单击“关闭”按钮,关闭表单。
第9题:
设计名为“mysupply”的表单。表单的标题为“零件供应情况”。表单中有一个表格控件和两个命令按钮“查询”和“退出”。 运行表单时,单击“查询”命令按钮后,表格控件中显示工程号“J1”所使用的零件的零件名、颜色和重量。单击“退出”按钮关闭表单。