2011年计算机二级VFP上机考试冲刺模拟试题（2）

会计考友

　　第2套
7 B# U0 m% R7 i8 }. F6 g　　一、 1. 打开并修改数据库
/ e$ c, X6 |4 @　　MODIFY DATABASE SCORE_MANAGER
" \& Z8 R2 A: `  ^) r　　2. 选择“student”表中主索引键“学号”并按住不放，然后移动鼠标拖到“score1”表中的索引键为“学号”处，松开鼠标即可。
　　3. 选择“course”表中主索引键“课程号”并按住不放，然后移动鼠标拖到“score1”表中的索引键为“课程号”处，松开鼠标即可。
　　这样，三个表就建立了永久性联系。
　　方法一：
　　1. 打开并修改数据库
/ d2 p2 \5 t7 i& }3 b0 O1 B　　MODIFY DATABASE SCORE_MANAGER
( m& y. B7 [+ m& g% B" X: E　　2. 在“数据库设计器-SCORE_MANAGER”中，选择表“COURSE”并单击鼠标右键，选择“修改”命令项。
1 o! m" E3 W* m　　3. 在“表设计器-COURSE.dbf”中，在结构的最后处输入字段名为“开课学期”，然后选择类型为“数值型”并输入宽度2，并单击“确定”按钮即可。
　　方法二：
　　使用命令增加字段
3 p, `4 E6 D8 P5 M: Y: `6 v* |3 g　　ALTER TABLE course ADD COLUMN 开课学期 N(2,0)
　　1. 打开并修改数据库
　　MODIFY DATABASE SCORE_MANAGER
& @$ m* r! U1 v2 o　　2. 在“数据库设计器-SCORE_MANAGER”中，选择表“SCORE1”并单击鼠标右键，选择“修改”命令项。
+ Z5 H3 g! P) F+ D$ b　　3. 在“表设计器-SCORE1.dbf”中，选择“成绩”字段，在“字段有效性”标签的“规则”处输入“成绩>=0”，在“信息”处输入“"成绩必须大于或等于零"”，最后单击“确定”按钮即可。
　　如果已在“数据库设计器-SCORE_MANAGER”中，那么第1和2步可以不做。
　　1. 打开并修改数据库
* v7 [% \# ^3 F* v　　MODIFY DATABASE SCORE_MANAGER
　　2. 在“数据库设计器-SCORE_MANAGER”中，选择表“SCORE1”并单击鼠标右键，选择“修改”命令项。
6 J1 l$ e7 W& F- Y6 P: J　　3. 在“表设计器-SCORE1.dbf”中，选择字段名为“成绩”，在NULL处进行打勾(允许空值)，最后单击“确定”按钮即可。
- i9 c' W9 D. n　　如果已在“数据库设计器-SCORE_MANAGER”中，那么第1和2步可以不做。
　　二、
/ b/ A/ H, m7 n) H9 N" E　　SELECT 姓名,2003-YEAR(出生日期) AS 年龄 FROM student INTO TABLE new_table1
: v1 d) U' L# b7 i. \' s　　1. 单击“工具\向导\报表”菜单项，并显示“向导选取”对话框。
　　2. 在“向导选取”对话框中，选择“报表向导”并单击“确定”按钮，并显示“报表向导”对话框。

2 ^, w' u* N& D, h. c8 J& {　　3. 在“报表向导”对话框的“步骤1-字段选取”中，首先要选取表“NEW_TABLE1”，在“数据库和表”列表框中，选择表“NEW_TABLE1”，接着在“可用字段”列表框中显示表NEW_TABLE1的所有字段名，并选定所有字段名至“选定字段”列表框中，单击“完成”按钮。

会计考友

</p>　　4. 在“报表向导”对话框的“步骤6-完成”中，在“报表标题”文本框中输入“姓名-年龄”，单击“完成”。
2 G# |% ]& O, ~! J  `　　5. 在“另存为”对话框中，输入保存报表名“NEW_REPORT1”，再单击“保存”按钮，最后报表就生成了。
2 W% I- O9 K: q& \: X  ~; Y　　1. 输入建立菜单命令
) w2 p0 v, a4 I　　CREATE MENU query_menu
5 `6 j, A# v* C- q* S) ]) P　　2. 在“新建菜单”对话框中，单击“菜单”按钮。
　　3. 在“菜单设计器 - query_menu.mnx”窗口中，分别建立两个菜单项“查询”和“退出”。
　　4. 在“退出”菜单项的“结果”选择“命令”，并在“选项”处输入“set sysmenu to default”。
( {; n0 ~+ E8 {　　三、
　　1. 在命令窗口中输入建立表单命令
　　CREATE FORM Myform1
$ `0 Q2 b: D( |/ P　　2. 在“表单设计器”中，在“属性”的Caption处输入“成绩查询”。
　　3. 在“表单设计器”中，添加一个标签控件，在“属性”的Caption处输入“输入学号”。再在“学号”标签的后面添加一个文本框“Text1”。
; c8 [- o/ s+ I& k2 S( h3 {　　4. 在“表单设计器”中，添加一个表格控件，在“属性”的RecordSourceType处选择“4 - SQL 说明”。
　　5. 在“表单设计器”中，添加两个命令按钮，单击第1个命令按钮在“属性”的Caption处输入“查询”，单击第2个命令按钮在“属性”的Caption处输入“退出”。
　　6. 双击“查询”命令按钮，在“Command1.Click”编辑窗口中输入命令，接着关闭编辑窗口。
　　close all
& }  c7 ^$ m1 C; h6 A　　use score1
　　locate for 学号=alltrim(ThisForm.Text1.Value)
　　if .not.found()
　　WAIT "学号不存在，请重新输入" WINDOWS TIMEOUT 5
　　else
　　ThisForm.Grid1.Recordsource="sele 课程名,成绩 from score1,course where 学号=alltrim(ThisForm.Text1.Value) and score1.课程号=course.课程号 into cursor temp1"
. T7 b5 x$ ^2 q1 k4 y+ |, k　　select temp1
　　go top
. ?/ p. t. r0 M% h- Q4 K( y; T$ ]& j　　endif
　　7. 双击“退出”命令按钮，在“Command2.Click”编辑窗口中输入“Release Thisform”，接着关闭编辑窗口。