计算机等级考试二级VF题库75套上机试题(56)

会计考友

　一、　　一、命令方式：启动Visual Foxpro系统后，在命令窗口中输入
　　CREATE PROJECT 库存管理 && 保留字可以取前四个字母
　　二、可以使用菜单方式进行建立
　　1. 单击“文件\新建”命令项，弹出“新建”对话框。
　　2. 在“新建”对话框中，选择“项目”单选钮，再按“新建文件”按钮，弹出“创建”对话框。
+ A+ k! O% D) z2 @* l　　3. 在“创建”对话框中输入项目文件名“饭店管理”，再按回车键或按“保存”按钮，这样就可以建立项目文件了，并出现“项目管理器”对话框。
　　1. 打开项目“库存管理”，在项目管理器中的“数据”选项卡中，选择“数据库”，单击“新建”按钮。
　　2. 在“新建数据库”对话框中，再单击“新建数据库”按钮。
　　3. 在“创建”对话框中，选定考生文件夹，在“数据库名”中输入“使用零件情况”，然后单击“保存”命令按钮即可。
1 {; M  e- u2 L) A$ e. D7 l- G　　方法一：
　　1. 打开并修改数据库
　　MODIFY DATABASE 使用零件情况
" ]! c9 g! P8 }! h7 {　　2. 在“数据库设计器-使用零件情况”中，选择表“零件信息”并单击鼠标右键，选择“修改”命令项。
　　3. 在“表设计器-零件信息.dbf”中，在结构的最后处输入字段名为“规格”，然后选择类型为“字符型”并输入宽度“8”，并单击“确定”按钮即可。
　　方法二：
2 M! y6 L* g$ x　　使用命令增加字段
　　ALTER TABLE 零件信息 ADD COLUMN 规格 C(8)
1 ]& ]4 ~+ D8 \8 p6 o　　1. 打开并修改菜单文件
2 t: N; w0 ^9 x' w. C0 _  y- G　　MODIFY MENU mymenu
  y8 L8 ?! l  A7 K: r　　2. 在菜单名称“文件”行处，单击“编辑”按钮，将显示“文件”菜单下的子菜单项“查找”和“替换”。
8 F, q5 L  k. ?! Y' I+ Y2 ^- H　　3. 在菜单名称“查找”行处，单击“选项”下的按钮，接着显示“提示选项”对话框，再把插入点移至“键标签”处，再按“Ctrl+T”键即可。
3 Z( W' w- J* f; ^/ l8 }# e　　二、
! n5 A+ v7 l' ?0 l　　在item.txt文件存放如下内容
  o; b  [) H" B- _! e3 ]　　select 项目信息.项目号,项目名,使用零件.零件号,零件名称 ;
　　from 项目信息,使用零件,零件信息 where 项目信息.项目号=使用零件.项目号;
　　and 使用零件.零件号=零件信息.零件号 and 使用零件.零件号 in ;
7 d+ g0 x& a' \+ @9 Y　　(select 零件号 from 使用零件 where 使用零件.项目号='s1') into dbf item_temp;
　　order by 项目信息.项目号 desc
　　1. 打开并修改数据库
　　MODIFY DATABASE 使用零件情况
4 P; ]3 _2 C# v( B% P$ _8 a　　2. 单击“文件\新建”菜单项，在“新建”对话框中选择“视图”单选钮，再单击“新建文件”。在“添加表或视图”对话框中，双击表“零件信息”(或单击选中表“零件信息”，接着单击“添加”按钮)，再双击表“使用零件”，在“联接条件”对话框中直接单击“确定”按钮，再双击表“项目信息”，在“联接条件”对话框中直接单击“确定”按钮，把这三个表文件添加到“视图设计器”中，接着单击“关闭”按钮，来关闭“添加表或视图”对话框。
　　3. 单击“字段”选项卡，选择试题要求的字段添加到“选定字段”列表框中。
& ~3 x8 ~( C8 f7 w) i　　4. 单击“筛选”选项卡，在“字段名”处选择“项目信息.项目号”，在“条件”处选择“=”，在“实例”处输入“"s2"”。
　　5. 单击“排序依据”选项卡，选择“项目信息.项目号”并选择“升序”，接着单击“添加”按钮。
　　6. 保存该视图，在“保存”对话框中输入视图名“view_item”。
　　三、
　　1. 在命令窗口中输入建立表单命令
　　CREATE FORM form_item
　　2. 在“表单设计器”中，在“属性”的Caption处输入“使用零件情况统计”，在Name处输入“form_item”。
: z1 j5 z; Z5 l2 ?) Z: p! w1 l　　3. 双击Load Event事件处，在“form_item.Load”输入下列语句。
: ?; ]  q! z- h# @4 @) L7 \# [　　public ma(3),cox
　　open database 使用零件情况
　　cox=1
+ C* {1 ?) f  @3 z& t5 H5 e　　ma(1)="s1"
　　ma(2)="s2"
0 C- h3 e9 e: e0 c　　ma(3)="s3"
/ z* t1 {! R7 Y$ Z　　4. 双击Destroy Event事件处，在“form_item.Destroy”输入下列语句。
　　release cox ,ma
　　close database
9 S! j$ `$ i+ x6 v　　5. 在“表单设计器”中，添加一个组合框控件，在RowSource处输入“ma”，在RowSourceType处选择“5 - 数组”，在ControlSource处输入“cox”，在Style处选择“2 - 下拉列表框”。
% S, Q  J0 ]8 T* }- M　　6. 在“表单设计器”中，添加一个文本框Text1和添加两个命令按钮，在第1个命令按钮“属性”的Caption处输入“统计”，在第2个命令按钮“属性”窗口的Caption处输入“退出”。
8 I) N( {/ J6 ]- O! `8 m$ E( w0 V　　7. 双击“统计”按钮，在“Command1.Click”编辑窗口中编写相应的程序
+ _5 r, {# A2 t; _; J　　select sum(单价*数量) from 项目信息,使用零件,零件信息 where 项目信息.项目号=使用零件.项目号;
1 l$ n6 f) @' m! W, ^9 e# t( d( J% ?& t　　and 使用零件.零件号=零件信息.零件号 ;
　　and 使用零件.项目号=ma(cox);
1 e7 a: v( I; h  j* v　　into array a
9 _' R6 G1 g4 w' E+ O& f　　form_item.text1.value=a[1]
9 {$ N2 W1 _! v' q- F　　8. 双击“退出”命令按钮，在“Command2.Click”编辑窗口中输入“Release Thisform”，并关闭编辑窗口。