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

会计考友

第8套　　一、
　　一、建立数据库
, K& _; h! k5 u　　1. 命令方式：启动Visual Foxpro系统后，在命令窗口中输入
　　CREATE DATABASE orders_manage
4 Y1 l8 H/ L' R4 Q　　不出现“数据库设计器”对话框
　　2. 可以使用菜单方式进行建立
/ o! Y1 x0 H5 B) w  m9 E　　1). 单击“文件\新建”命令项，弹出“新建”对话框。
6 y* }1 c- T8 o$ J+ A8 B　　2). 在“新建”对话框中，选择“数据库”单选钮，再按“新建文件”按钮，弹出“创建”对话框。
　　3). 在“创建”对话框中输入数据库名“orders_manage”，再按回车键或按“保存”按钮，这样就可以建立数据库了，并出现“数据库设计器-orders_manage”对话框。
　　二、自由表添加到数据库
　　可以有两种方法：一是命令方法，二是菜单方法。
4 T* I9 L# M/ u" R8 N: B! }3 Z　　命令方法：
　　OPEN DATABASE orders_manage
　　ADD TABLE employee
) h# P* f2 W2 c( y5 B0 G' h　　ADD TABLE orders
6 g2 z5 j3 l( c, j　　菜单方法：
　　1. 单击“文件\打开”命令项，选择“文件类型”为数据库，打开“orders_manage”。
　　2. 在“数据库设计器-orders_manage”中单击鼠标右键，显示右击菜单，选择“添加表”命令，并选择相应的表文件即可(employee和orders)。
　　1. 打开并修改数据库
/ A2 ?! u6 t$ n# b2 d6 \　　MODIFY DATABASE orders_manage
　　2. 在“数据库设计器-orders_manage”中，选择表“employee”并单击鼠标右键，选择“修改”命令，在“表设计器-employee.dbf”中，单击“索引”选项卡，然后输入索引名“职工号”，选择类型为“主索引”，表达式为“职工号”，最后单击“确定”按钮，再单击“是(Y)”这样索引就建立了。
　　3. 在“数据库设计器-orders_manage”中，选择表“orders”并单击鼠标右键，选择“修改”命令，在“表设计器-orders.dbf”中，单击“索引”选项卡，然后输入索引名“职工号”，选择类型为“普通的索引”，表达式为“职工号”，最后单击“确定”按钮，再单击“是(Y)”这样索引就建立了。
8 j$ U1 K2 |/ G& W　　4. 在“数据库设计器-orders_manage”中，然后选择“employee”表中主索引键“职工号”并按住不放，然后移动鼠标拖到“orders”表中的索引键为“职工号”处，松开鼠标即可。
　　一、命令方式：
* a# x: _, c7 Q3 P# w( |3 B　　CREATE PROJECT 职工订单管理
　　二、可以使用菜单方式进行建立
　　1. 单击“文件\新建”命令项，弹出“新建”对话框。
　　2. 在“新建”对话框中，选择“项目”单选钮，再按“新建文件”按钮，弹出“创建”对话框。
　　3. 在“创建”对话框中输入项目文件名“职工订单管理”，再按回车键或按“保存”按钮，这样就可以建立项目文件了，并出现“项目管理器”对话框。
4 ^$ D  c0 Y% r　　4. 在项目管理器中的“数据”选项卡中，选择“数据库”，单击“添加”按钮。
" P* k, S1 y+ @. F, N5 D' i& F　　5. 在“打开”对话框中，选定库文件“orders_manage.dbc”，然后单击“确定”命令按钮即可。
　　1. 在“项目管理器-职工订单管理”中，展开“数据库”，再展开“orders_manage”，再选中“本地视图”，单击“新建”按钮，出现“新建本地视图”对话框，再单击“新建视图”按钮，再出现“添加表或视图”对话框，双击表“employee”，接着单击“关闭”按钮。
  d& s$ R# O* B! O- W　　2. 在“视图设计器-视图1”中，单击“字段”选项卡，选择“Employee.职工号”、“Employee.姓名”，接着在“函数和表达式”处输入“YEAR(DATE())-YEAR(出生日期) AS 年龄”再单击“添加”按钮。
2 e' b0 R% O. C3 Q　　3. 在“视图设计器-视图1”中，单击“排序依据”选项卡，选择“YEAR(DATE())-YEAR(出生日期) AS 年龄”并选中“降序”单选钮。
　　4. 保存该视图，输入视图名为“view_ca”，再单击“确定”按钮

会计考友

二、　　1. 单击“工具\向导\报表”菜单项，并显示“向导选取”对话框。
　　2. 在“向导选取”对话框中，选择“一对多报表向导”并单击“确定”按钮，并显示“一对多报表向导”对话框。
　　3. 在“一对多报表向导”对话框的“步骤1-从父表选择字段”中，首先要选取表“employee”，在“数据库和表”列表框中，选择表“employee”，接着在“可用字段”列表框中显示表employee的所有字段名，并选定“仓库号”、“职工号”和“姓名”至“选定字段”列表框中，单击“下一步”按钮。
　　4. “一对多报表向导”对话框的“步骤2-从子表选择字段”中，首先要选取表“orders”，在“数据库和表”列表框中，选择表“orders”，接着在“可用字段”列表框中显示表orders的所有字段名，并选定选定所有字段(除职工号以外)至“选定字段”列表框中，单击“下一步”按钮。
　　5. 在“一对多报表向导”对话框的“步骤3-为表建立关系”中，单击“下一步”按钮。
　　6. 在“一对多报表向导”对话框的“步骤4-排序记录”中，选择“仓库号”和选择“升序”单选按钮，再单击“添加”按钮，单击“下一步”按钮。
/ {- Z9 t. v5 w7 R/ E　　7. 在“一对多报表向导”对话框的“步骤5-选择报表样式”中，选择“简报式”，单击“下一步”按钮。
, l4 }& D0 [3 Q: K' }: L　　8. 在“一对多报表向导”对话框的“步骤6-完成”中，在“报表标题”文本框中输入“职工订单汇总”，单击“完成”。
' G5 m# ]1 O. g$ Q4 [　　9. 在“另存为”对话框中，输入保存报表名“report_c”，再单击“保存”按钮，最后报表就生成了。
( O+ R# F! r) e2 y6 Y; C8 f' b　　在文件cmd_cb.txt中存放
　　open database orders_manage
　　create view view_cb as select employee.职工号,姓名,sum(金额) as 总金额 from employee,orders where employee.职工号=orders.职工号 group by employee.职工号 having sum(金额)>=15000 order by 总金额 asc
, W2 |" z7 I# I5 C! h" H( s$ ]　　三、
4 S5 T% j. `4 v0 }2 t　　1. 建立表单
　　CREATE FORM myform_c
  X' w, G1 p# s+ V　　2. 在“表单设计器”中，在“属性”的Caption处输入“职工订单信息”，在Name处输入“myform_c”。
$ @  _3 j7 ^& l' L　　3. 在“表单设计器”中，添加三个标签，在第1个标签Label1“属性”的Caption处输入“职工号”，在第2个标签Label2“属性”的Caption处输入“姓名”，在第3个标签Label3“属性”的Caption处输入“性别”。
　　4. 在“表单设计器”中，添加三个文本框，Text1、Text2和Text3。
9 N9 v8 t; k- _5 R, G　　5. 在“表单设计器”中，添加一个表格Grid1，在其“属性”的Name处输入“Grdorders”，在RecordSourceType处选择“4-SQL说明”。
　　6. 在“表单设计器”中，添加两个命令按钮，在第1个命令按钮“属性”的Caption处输入“DO”，在第2个命令按钮“属性”的Caption处输入“Close”。
4 ?8 F. L7 h' M" t4 R　　7. 在“表单设计器”中，双击“Command2”命令按钮，在“Command2.Click”编辑窗口中输入“Release Thisform”，接着关闭编辑窗口。
　　8. 在“表单设计器”中，双击“Command1”命令按钮，在“Command1.Click”编辑窗口中输入下列语句，接着关闭编辑窗口。
　　zgh=ALLTRIM(ThisForm.Text1.Value)
% V8 L! s9 P3 x! c　　If Used("employee")
8 T/ B0 p! Z  [　　SELECT employee
/ B; ^  v. U4 P8 J) A　　ELSE
　　USE employee
　　ENDIF
4 B# y8 J# g/ y　　LOCATE FOR 职工号=zgh
　　ThisForm.Text2.Value=姓名
, _" m  ?8 g4 S0 n5 a1 S8 ^8 r. V　　ThisForm.Text3.Value=性别
# r+ x/ k  g) q% \7 t% m　　ThisForm.Grdorders.RecordSource="SELECT * FROM orders WHERE 职工号=='"+zgh+"' INTO CURSOR LSB"