计算机等级考试二级VF题库75套上机试题(2)
第2套 一、 1. 打开并修改数据库MODIFY DATABASE SCORE_MANAGER
2. 选择“student”表中主索引键“学号”并按住不放，然后移动鼠标拖到“score1”表中的索引键为“学号”处，松开鼠标即可。
3. 选择“course”表中主索引键“课程号”并按住不放，然后移动鼠标拖到“score1”表中的索引键为“课程号”处，松开鼠标即可。
这样，三个表就建立了永久性联系。
方法一：
1. 打开并修改数据库
MODIFY DATABASE SCORE_MANAGER
2. 在“数据库设计器-SCORE_MANAGER”中，选择表“COURSE”并单击鼠标右键，选择“修改”命令项。
3. 在“表设计器-COURSE.dbf”中，在结构的最后处输入字段名为“开课学期”，然后选择类型为“数值型”并输入宽度2，并单击“确定”按钮即可。
方法二：
使用命令增加字段
ALTER TABLE course ADD COLUMN 开课学期 N(2,0)
1. 打开并修改数据库
MODIFY DATABASE SCORE_MANAGER
2. 在“数据库设计器-SCORE_MANAGER”中，选择表“SCORE1”并单击鼠标右键，选择“修改”命令项。
3. 在“表设计器-SCORE1.dbf”中，选择“成绩”字段，在“字段有效性”标签的“规则”处输入“成绩>=0”，在“信息”处输入“"成绩必须大于或等于零"”，最后单击“确定”按钮即可。
如果已在“数据库设计器-SCORE_MANAGER”中，那么第1和2步可以不做。
1. 打开并修改数据库
MODIFY DATABASE SCORE_MANAGER
2. 在“数据库设计器-SCORE_MANAGER”中，选择表“SCORE1”并单击鼠标右键，选择“修改”命令项。
3. 在“表设计器-SCORE1.dbf”中，选择字段名为“成绩”，在NULL处进行打勾(允许空值)，最后单击“确定”按钮即可。
如果已在“数据库设计器-SCORE_MANAGER”中，那么第1和2步可以不做。
二、
SELECT 姓名,2003-YEAR(出生日期) AS 年龄 FROM student INTO TABLE new_table1
1. 单击“工具\向导\报表”菜单项，并显示“向导选取”对话框。
2. 在“向导选取”对话框中，选择“报表向导”并单击“确定”按钮，并显示“报表向导”对话框。
3. 在“报表向导”对话框的“步骤1-字段选取”中，首先要选取表“NEW_TABLE1”，在“数据库和表”列表框中，选择表“NEW_TABLE1”，接着在“可用字段”列表框中显示表NEW_TABLE1的所有字段名，并选定所有字段名至“选定字段”列表框中，单击“完成”按钮。
4. 在“报表向导”对话框的“步骤6-完成”中，在“报表标题”文本框中输入“姓名-年龄”，单击“完成”。
5. 在“另存为”对话框中，输入保存报表名“NEW_REPORT1”，再单击“保存”按钮，最后报表就生成了。
1. 输入建立菜单命令
CREATE MENU query_menu
2. 在“新建菜单”对话框中，单击“菜单”按钮。
3. 在“菜单设计器 - query_menu.mnx”窗口中，分别建立两个菜单项“查询”和“退出”。
4. 在“退出”菜单项的“结果”选择“命令”，并在“选项”处输入“set sysmenu to default”。
三、
1. 在命令窗口中输入建立表单命令
CREATE FORM Myform1
2. 在“表单设计器”中，在“属性”的Caption处输入“成绩查询”。
3. 在“表单设计器”中，添加一个标签控件，在“属性”的Caption处输入“输入学号”。再在“学号”标签的后面添加一个文本框“Text1”。
4. 在“表单设计器”中，添加一个表格控件，在“属性”的RecordSourceType处选择“4 - SQL 说明”。
5. 在“表单设计器”中，添加两个命令按钮，单击第1个命令按钮在“属性”的Caption处输入“查询”，单击第2个命令按钮在“属性”的Caption处输入“退出”。
6. 双击“查询”命令按钮，在“Command1.Click”编辑窗口中输入命令，接着关闭编辑窗口。
close all
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"
select temp1
go top
endif
7. 双击“退出”命令按钮，在“Command2.Click”编辑窗口中输入“Release Thisform”，接着关闭编辑窗口。
页:
[1]