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

会计考友

第13套 　　一、
3 I7 W$ _6 W' [  ~) H* ?　　一、建立数据库
( e# o0 s2 {4 F9 K5 B　　1. 命令方式
　　CREATE DATABASE 订单管理
　　不出现“数据库设计器”对话框
4 G% v! d  M$ t! A　　2. 可以使用菜单方式进行建立
　　1). 单击“文件\新建”命令项，弹出“新建”对话框。
　　2). 在“新建”对话框中，选择“数据库”单选钮，再按“新建文件”按钮，弹出“创建”对话框。
　　3). 在“创建”对话框中输入数据库名“订单管理”，再按回车键或按“保存”按钮，这样就可以建立数据库了，并出现“数据库设计器-订单管理”对话框。
8 I' B. z0 x; H" ^$ b( H　　二、把自由表添加到数据库
. b1 Q$ c/ S1 _) k( U. Y0 X( j( W　　可以有两种方法：命令方法，菜单方法。
5 \8 l8 u! s, K' {# L- L" y　　命令方法：
　　OPEN DATABASE 订单管理
　　ADD TABLE employee
　　ADD TABLE orders
　　ADD TABLE customer
　　菜单方法：
　　1). 单击“文件\打开”命令项，选择“文件类型”为数据库，打开“订单管理”。
　　2). 在“数据库设计器-订单管理”中单击鼠标右键，显示右击菜单，选择“添加表”命令，并选择相应的表文件即可(employee、orders和customer)。
, T5 s! G1 o+ x+ u9 P( T　　1. 打开并修改数据库
　　MODIFY DATABASE 订单管理
　　2. 在“数据库设计器-订单管理”中，选择表“orders”并单击鼠标右键，选择“修改”命令，在“表设计器-orders.dbf”中，单击“索引”选项卡，然后输入索引名“nf”，选择类型为“普通索引”，表达式为“year(签订日期)”，最后单击“确定”按钮，再单击“是(Y)”就可以建立索引了。
　　1. 打开并修改数据库
) r4 z1 {# d( }' a$ G8 a0 X- _; l　　MODIFY DATABASE 订单管理
4 z. ]0 u6 `6 X　　2. 在“数据库设计器-订单管理”中，选择表“employee”并单击鼠标右键，选择“修改”命令，在“表设计器-employee.dbf”中，单击“索引”选项卡，然后输入索引名“职员号”，选择类型为“主索引”，表达式为“职员号”，最后单击“确定”按钮，再单击“是(Y)”就可以建立索引了。
　　3. 在“数据库设计器-订单管理”中，选择表“orders”并单击鼠标右键，选择“修改”命令，在“表设计器-orders.dbf”中，单击“索引”选项卡，然后输入索引名“职员号”，选择类型为“普通索引”，表达式为“职员号”，最后单击“确定”按钮，再单击“是(Y)”就可以建立索引了。
　　4. 在“数据库设计器-订单管理”中，然后选择“employee”表中主索引键“职员号”并按住不放，然后移动鼠标拖到“orders”表中的索引键为“职员号”处，松开鼠标即可。
　　1. 在已建立的永久性联系后，双击关系线，并显示“编辑关系”对话框。
　　2. 在“编辑关系”对话框中，单击“参照完整性”按钮，并显示“参照完整性生成器”。
+ n2 `8 i" d" E3 X3 [7 }5 Y4 ^　　3. 在“参照完整性生成器”对话框中，单击“更新规则”选项卡，并选择“限制”单选按钮，单击“删除规则”选项卡，并选择“级联”单选按钮，单击“插入规则”选项卡，并选择“限制”单选按钮，接着单击“确定”按钮，并显示“是否保存改变，生成参照完整性代码并退出?”，最后单击“是”按钮，这样就生成了指定参照完整性。
　　注意：可能会出现要求整理数据库，那么请整理后重新做操作。

会计考友

　二、　　1. 打开并修改表单
　　MODIFY FORM formone
" @. N* u# }+ Y8 V- S2 U　　2. 单击“显示\数据环境”菜单项，在“打开”对话框中双击表“orders”，再单击“关闭”来关闭“添加表或视图”对话框。
　　3. 选中列表框List1，在其“属性”的RowSourceType处选择“8 - 结构”，在RowSource处输入“orders”，在MultiSelect处选择“.T. - 真”。
　　4. 选中表格Grid1，在其“属性”的RecordSourceType处选择“4 - SQL 说明”。
　　5. 双击“显示”按钮，在Command1.Click中修改相应的语句。
' F7 G6 g; }4 Q% S( H1 ]# H5 E　　第1处：FOR i=1 TO thisform.List1.ListCount
* f0 c) m% z+ Z5 I2 y; x　　第2处：s=thisform.List1.List(i)
　　第3处：s=s+","+thisform.List1.List(i)
1 r9 _# }4 c1 u( ]/ L0 m$ I1 ^' X　　1. 在命令窗口中输入建立查询命令
3 X1 c/ ]4 _1 b6 G3 ?0 {　　CREATE QUERY queryone
  b( B7 L4 v+ n" L8 e$ j, T  i　　2. 在“打开”对话框中，选择表“employee”再按“确定”按钮，在“添加表或视图”对话框中，单击“其他”按钮，选择表“orders”再按“确定”按钮，在“联接条件”对话框中，直接按“确定”按钮，选择表“customer”再按“确定”按钮，在“联接条件”对话框中，直接按“确定”按钮。在“添加表或视图”中，再按“关闭”按钮。
　　3. 单击“字段”选项卡，选择“Orders.订单号”、“Orders.签订日期”、“Orders.金额”，在“函数和表达式”处输入“Employee.姓名 AS 签订者”并单击“添加”按钮，再选择“Customer.客户名”。
　　4. 单击“排序依据”选项卡，选择“Orders.签订日期”并选择“降序”，接着单击“添加”按钮。
　　5. 单击“筛选”选项卡，在“字段名”中，选择“Orders.签订日期”，在“条件”处选择“>=”，再在“实例”处输入“{^2001-05-01}”。
- e% f1 m3 _) ^! v2 a) O' M　　6. 单击“查询\输出去向”菜单项，在“查询去向”对话框中，单击“表”按钮，在“表名”处输入“tableone”，再单击“确定”按钮。
8 V3 M- ]! m2 W: W. `5 ~　　7. 按“Ctrl+W”键保存该查询并运行。
" q0 C# u$ K9 _' P$ C/ v8 t　　三、
　　一、 建立菜单
' k4 w0 l, P0 H- l. H9 v8 `7 {　　1. 建立菜单文件
　　CREATE MENU mymenu
　　在“新建菜单”对话框中，单击“菜单”按钮。
　　2. 在“菜单设计器-mymenu.mnx”中，在“菜单名称”中输入“统计(\
　　3. 选中“统计(\
　　select customer.客户号,客户名,sum(金额) as 合计 from orders,customer where orders.客户号=customer.客户号 group by customer.客户号 order by 合计 desc into table tabletwo
* r5 i9 M" g& J2 W  M5 q- R0 J. Q　　4. 选中“退出(\
: y4 S8 B) c5 u6 ^' P　　myform.release
- }, h& \( r9 Y" l. e9 M" _. o* n2 A　　5. 单击“显示\常规选项”菜单项，在“常规选项”对话框的“顶层菜单”框中打勾，再单击“确定”按钮。
　　6. 在“菜单设计器”窗口下，单击“菜单”菜单栏，选择“生成”菜单项，生成“mymenu.mpr”文件。
　　二、建立表单
　　1. 新建表单
　　CREATE FORM myform
　　2. 在“表单设计器”中，在“属性”的Caption处输入“考试”，在ShowWindow处选择“2 - 作为顶层表单”，双击Init Event事件，在Form1.Init中输入“do mymenu.mpr with this,"xxx"”，双击Destroy Event事件，在Form1.Destroy中输入“release menu xxx extended”。