计算机等级考试二级VF题库75套上机试题(56)
一、 一、命令方式：启动Visual Foxpro系统后，在命令窗口中输入CREATE PROJECT 库存管理 && 保留字可以取前四个字母
二、可以使用菜单方式进行建立
1. 单击“文件\新建”命令项，弹出“新建”对话框。
2. 在“新建”对话框中，选择“项目”单选钮，再按“新建文件”按钮，弹出“创建”对话框。
3. 在“创建”对话框中输入项目文件名“饭店管理”，再按回车键或按“保存”按钮，这样就可以建立项目文件了，并出现“项目管理器”对话框。
1. 打开项目“库存管理”，在项目管理器中的“数据”选项卡中，选择“数据库”，单击“新建”按钮。
2. 在“新建数据库”对话框中，再单击“新建数据库”按钮。
3. 在“创建”对话框中，选定考生文件夹，在“数据库名”中输入“使用零件情况”，然后单击“保存”命令按钮即可。
方法一：
1. 打开并修改数据库
MODIFY DATABASE 使用零件情况
2. 在“数据库设计器-使用零件情况”中，选择表“零件信息”并单击鼠标右键，选择“修改”命令项。
3. 在“表设计器-零件信息.dbf”中，在结构的最后处输入字段名为“规格”，然后选择类型为“字符型”并输入宽度“8”，并单击“确定”按钮即可。
方法二：
使用命令增加字段
ALTER TABLE 零件信息 ADD COLUMN 规格 C(8)
1. 打开并修改菜单文件
MODIFY MENU mymenu
2. 在菜单名称“文件”行处，单击“编辑”按钮，将显示“文件”菜单下的子菜单项“查找”和“替换”。
3. 在菜单名称“查找”行处，单击“选项”下的按钮，接着显示“提示选项”对话框，再把插入点移至“键标签”处，再按“Ctrl+T”键即可。
二、
在item.txt文件存放如下内容
select 项目信息.项目号,项目名,使用零件.零件号,零件名称 ;
from 项目信息,使用零件,零件信息 where 项目信息.项目号=使用零件.项目号;
and 使用零件.零件号=零件信息.零件号 and 使用零件.零件号 in ;
(select 零件号 from 使用零件 where 使用零件.项目号='s1') into dbf item_temp;
order by 项目信息.项目号 desc
1. 打开并修改数据库
MODIFY DATABASE 使用零件情况
2. 单击“文件\新建”菜单项，在“新建”对话框中选择“视图”单选钮，再单击“新建文件”。在“添加表或视图”对话框中，双击表“零件信息”(或单击选中表“零件信息”，接着单击“添加”按钮)，再双击表“使用零件”，在“联接条件”对话框中直接单击“确定”按钮，再双击表“项目信息”，在“联接条件”对话框中直接单击“确定”按钮，把这三个表文件添加到“视图设计器”中，接着单击“关闭”按钮，来关闭“添加表或视图”对话框。
3. 单击“字段”选项卡，选择试题要求的字段添加到“选定字段”列表框中。
4. 单击“筛选”选项卡，在“字段名”处选择“项目信息.项目号”，在“条件”处选择“=”，在“实例”处输入“"s2"”。
5. 单击“排序依据”选项卡，选择“项目信息.项目号”并选择“升序”，接着单击“添加”按钮。
6. 保存该视图，在“保存”对话框中输入视图名“view_item”。
三、
1. 在命令窗口中输入建立表单命令
CREATE FORM form_item
2. 在“表单设计器”中，在“属性”的Caption处输入“使用零件情况统计”，在Name处输入“form_item”。
3. 双击Load Event事件处，在“form_item.Load”输入下列语句。
public ma(3),cox
open database 使用零件情况
cox=1
ma(1)="s1"
ma(2)="s2"
ma(3)="s3"
4. 双击Destroy Event事件处，在“form_item.Destroy”输入下列语句。
release cox ,ma
close database
5. 在“表单设计器”中，添加一个组合框控件，在RowSource处输入“ma”，在RowSourceType处选择“5 - 数组”，在ControlSource处输入“cox”，在Style处选择“2 - 下拉列表框”。
6. 在“表单设计器”中，添加一个文本框Text1和添加两个命令按钮，在第1个命令按钮“属性”的Caption处输入“统计”，在第2个命令按钮“属性”窗口的Caption处输入“退出”。
7. 双击“统计”按钮，在“Command1.Click”编辑窗口中编写相应的程序
select sum(单价*数量) from 项目信息,使用零件,零件信息 where 项目信息.项目号=使用零件.项目号;
and 使用零件.零件号=零件信息.零件号 ;
and 使用零件.项目号=ma(cox);
into array a
form_item.text1.value=a
8. 双击“退出”命令按钮，在“Command2.Click”编辑窗口中输入“Release Thisform”，并关闭编辑窗口。
页:
[1]