二级VF教材课后习题答案

二级ＶＦ教材课后习题答案

习题一

一、选择题 1）D 2）A 3）B 4）B 5）C 6）B 7）C 8）D

二、填空题 1）事物与事物之间的联系 2）关系数据模型 3）属性 元组 4）选择 联接 投影

5）去掉重复属性的等值联接 6）空值 7）一方 多方 8）两个表的主关键字

9）关系 数据库开发 面向对象

习题二

一、选择题 1）C 2）D 3）D 4）D 5）B 6）C 7）D 8）D

二、填空题

1）设计器 2）控制面板中“添加/删除程序” 3）工具 选项

4）区域 5）文件位置 6）.PJX 7）代码

8）从项目中移去，被移去文件仍存在于原目录中 不仅从项目中移去文件，还从磁盘删除

习题三

一、选择题 1）D 2）B 3）C 4）D 5）A 6）C 7）A 8）65.00 9）D

二、填空题 1）337.201 2）15 3）字符型 4）D C

三、上机题 1）（假定系统当前日期是2002年9月21日，则结果为）

今天是：2002年9月21日

（假定系统当前日期是2002年10月1日，则结果为）

今天是：2002年10月01日

2） 2.4+12.4 14.80

3） 7 586个人计算机 奔腾586个人计算机 奔腾586个人计算机

4） 5 100.00 88991

5） （假定系统当前日期是2002年9月21日，则结果为） 2002年□9月21日

习题四

一、选择题 1）D 2）D 3）D 4）C 5）C

二、填空题 1） 实体 2） 主 普通 3） SET RELATION TO 4） 逻辑表达式 5） 32767

习题五

一、选择题 1）D 2）A 3）C 4）A

二、填空题 1） UNION 2） IS NULL 3） 逻辑 4） SUM AVG 5） INTO CURSOR

三、上机题 1） ① SELECT 供应商名 FROM 供应商 WHERE 地址='北京' ② SELECT 职工号,仓库号 FROM 职工 WHERE 职工号 IN;

(SELE 职工号 FROM 订购单 WHERE 供应商号='S3') ③ SELE * FROM 供应商 WHERE 地址='北京' AND ;

(供应商号 IN (SELE 供应商号 FROM 订购单 WHERE 职工号='E1')) ;

AND (供应商号 IN (SELE 供应商号 FROM 订购单 WHERE 职工号='E3')) ④ SELECT DIST 城市 FROM 仓库,职工,订购单 WHERE 供应商号='S4';

AND 订购单.职工号=职工.职工号 AND 职工.仓库号=仓库.仓库号 ⑤ SELECT 订购单号 FROM 订购单 WHERE 职工号 IN ;

(SELECT 职工号 FROM 职工 WHERE 工资>1230);

AND 供应商号 IN (SELECT 供应商号 FROM 供应商 WHERE 地址='北京') ⑥ SELECT AVG(面积) FROM 仓库

⑦ SELECT 仓库号,COUNT(*) FROM 职工 WHERE 工资>1220 GROUP BY 仓库号 ⑧ SELECT * FROM 职工 A WHERE ;

工资<(SELECT AVG(工资) FROM 职工 B WHERE A.仓库号=B.仓库号) 2） ① INSERT INTO 供应商 value ('S9','智通公司','沈阳') ② DELETE FROM 供应商 WHERE 供应商号 NOT IN ;

(SELECT 供应商号 FROM 订购单)

PACK ③DELETE FROM 订购单 WHERE 职工号 IN;

(SELECT 职工号 FROM 职工,仓库 WHERE 城市='上海' AND;

仓库.仓库号=职工.仓库号) ④ UPDATE 仓库 SET 面积=面积+100 WHERE 城市='北京' ⑤ UPDATE 职工 SET 工资=工资*1.05 WHERE 工资<(SELECT AVG(工资) FROM 职工)

3） 建立学生管理数据库，其中包含有

学生：（学号（C/2），姓名（C/8），性别（L），出生日期（D））

【要求】 l 按照学号建立主索引；

II 出生日期字段有效性规则为：出生日期应小于系统当前日期，否则提示“出生日期输入错误！”

课程：（课程号（I），课程名（C/20））

【要求】 l 按照课程号建立主索引

成绩：（学号（C/2），课程号（I），成绩（N/5/1））

【要求】 I 成绩字段的有效性规则为：成绩应介于0～100分之间，否则提示“成绩应介于0～100之间”，

默认值为60分；

II 按照学号建立普通索引并与学生表建立联系；

III 按照课程号建立普通索引并与课程表建立联系；

命令如下：

CREA DATABASE 学生管理 &&建立须生管理数据库

*建立学生表

CREATE TABLE 学生;

( 学号 C(2) PRIMARY KEY, 姓名 C(8), 性别 L,;

出生日期 D CHECK (出生日期<=DATE()) ERROR \出生日期输入错误!\

*建立课程表

CREATE TABLE 课程; ( 课程号 I PRIMARY KEY,课程名 C(20))

*建立成绩表

CREATE TABLE 成绩( 学号 C(2),课程号 I, ;

成绩 N(6,2) CHECK (成绩>=0 AND 成绩<=100) ;

ERROR \成绩应介于0～100之间\

FOREIGN KEY 学号 TAG 学号 REFERENCES 学生,;

FOREIGN KEY 课程号 TAG 课程号 REFERENCES 课程 )

【提示】操作完成后，可以使用： OPEN DATABASE 学生管理 MODI DATABASE 查看结果。

习题六 一、选择题 1）D 2）C 3）A

二、填空题 1） 自动 2） 条件 3） 更新 4） 连接

习题七

一、选择题 1）B 2）C 3）C 4）B 5） C

二、填空题 1）S>10 AND S<=100； S>1 AND S<=10；S<=1 2）A0 A10 A12 A2 115 3）6 4 2

三、上机题目

1） SET TALK OFF

CLEAR

INPUT “请输入考试成绩：” TO CHJ

DO CASE

CASE CHJ<60

DJ=”不合格”

CASE CHJ>=60 AND CHJ<90

DJ=”合格”

CASE CHJ>=90

DJ=”优秀”

ENDCASE

?”成绩等级：”+DJ

SET TALK ON

2) SET TALK OFF

CLEAR I=1 J=1

S=0

K=2

DO WHILE K<30

S=I+J I=J J=S

K=K+1

ENDDO

?'第'+str(k)+'个数为：'+str(s)

3）错误1：第6行改为：CASE X>30

错误2: 第8行改为: CASE X<=30 AND MOD(X,5)<>0

选调试器窗口中的\文件\菜单,再选择\另存输出\命令,将\调试输出\窗口内输出内容存放到文本文件LX.TXT中

习题八

一、选择题 1)D 2)B 3)B 4)C 5)D 6)C 7)C 8)B

二、上机题

1)【提示】 操作步骤：

第一步：向表单添加文本框和命令组控件，分别设置命令按钮的Caption属性，在对命令按钮“=”的Caption

属性设置时，不能在其属性窗口中直接输入半角的“=”，否则提示语法错误。可以输入全角“＝”

或在表单FROM1的Init事件中，输入如下代码完成：

for i=1 to 10

this.commandgroup1.buttons(i).caption=alltrim(str(i))

endfor

this.commandgroup1.buttons(11).caption=\

this.commandgroup1.buttons(12).caption=\

this.commandgroup1.buttons(13).caption=\

this.commandgroup1.buttons(14).caption=\

this.commandgroup1.buttons(15).caption=\

第二步：在表单FORM1的Init事件中定义全局变量T，并赋初值空串

PUBLIC T=''

第三步：编写命令组的Click事件代码，完成接收输入的表达式：

do case

case this.value=1

t=t+\

thisform.text1.value=t

case this.value=2

t=t+\

thisform.text1.value=t

case this.value=3

t=t+\

thisform.text1.value=t

case this.value=4

t=t+\

thisform.text1.value=t

case this.value=5

t=t+\

thisform.text1.value=t

case this.value=6

t=t+\

thisform.text1.value=t

case this.value=7

t=t+\

thisform.text1.value=t

case this.value=8

t=t+\

thisform.text1.value=t

case this.value=9

t=t+\

thisform.text1.value=t

case this.value=10

t=t+\

thisform.text1.value=t

case this.value=11

t=t+\

thisform.text1.value=t

case this.value=12

t=t+'+'

thisform.text1.value=t

case this.value=13

t=t+'-'

thisform.text1.value=t

case this.value=14

thisform.text1.value=alltrim(str(&t,20,6)) && 宏替换T将得到数值表达式计算结果,20与6可以自己根据需要确定

case this.value=15 t=''

thisform.text1.value=t

endcase

thisform.refresh

第四步：当输入的表达式错误时，将引发命令组的Error事件，编写命令组的Error事件代码：

thisform.text1.value=\运算式错误\

2)【提示】 操作步骤：

第一步：创建表单，添加控件，将编辑框Edit1的Hideselection属性设为.f.，复选框Check1的数据源

（Controlsource属性）设为X，“确定”按钮的Default属性设为.T.

第二步：在表单的Load事件中定义公共变量X，赋初值0

第三步：编写确定按钮的Click事件代码：

IF X=0

THISFORM.EDIT1.SELTEXT=THISFORM.TEXT1.VALUE

ELSE

THISFORM.TEXT1.VALUE=THISFORM.EDIT1.SELTEXT

ENDIF

第四步:在表单的DESTORY事件中释放公共变量X

3)【提示】 操作步骤：

第一步:创建表单,添加控件,将组合框Combo1的Style属性改为2,Rowsourcetype属性改为5,Rowsource设为

在表单LOAD事件中定义的全局数组MA(5);修改列表框List1的Multiselect属性改为.t.,允许多重选定;确定按

钮的Default属性改为.T.

第二步:在表单的LOAD事件中定义数组,并给数组元素赋值,例如代码如下:

PUBLIC MA(5)

MA(1)=\选课.DBF\

MA(2)=\学生.DBF\

MA(3)=\仓库.DBF\

MA(4)=\职工.DBF\

MA(5)=\订购单.DBF\

第三步:组合框的InteractiveChange事件编写如下代码:

THISFORM.LIST1.ROWSOURCETYPE=8

fname=thisform.combo1.value

THISFORM.LIST1.ROWSOURCE=fname

use &fname

第四步:在确定按钮的CLICK事件中编写代码:

T=THISFORM.COMBO1.VALUE &&获得选中表的文件名

T=LEFT(t,LEN(T)-3) &&去掉文件名后面的.dbf M=0

* 判断哪些条目被选中,从而得到被选中的字段保存在变量T中

FOR I=1 TO thisform.list1.LISTCOUNT

IF THISFORM.LIST1.SELECTED(I)

T=T+THISFORM.LIST1.LIST(I)+','

M=M+1

ENDIF

ENDFOR

T=LEFT(t,LEN(T)-1) &&删除最后一个字段后面的逗号

*显示指定字段上的内容

If m<>0

THISFORM.LIST1.ColumnCount=m

THISFORM.LIST1.Rowsource=T

THISFORM.LIST1.RowsourceType=6

Endif

第五步:在表单的DESTORY事件中编写代码释放公共变量MA数组

4)【提示】 操作步骤：

第一步:创建表单,添加所需控件,修改有关的CAPTION值,将学生表添加到数据环境,然后分别将文本框

和复选框的Controlsource属性改为和其相对应的字段做为数据源

第二步:上一条按钮的CLICK事件代码:

SKIP -1

THISFORM.REFRESH

第二步:下一条按钮的CLICK事件代码:

SKIP

THISFORM.REFRESH

第三步:关闭按钮的CLICK事件代码:

THISFORM.RELEASE

习题九

一、填空题 1)条形菜单 弹出式菜单 2)SET SYSMENU NOSAVE SET SYSMENU TO DEFAULT

3)常规选项 ShowWindow Init 4)RightClick

二、上机题

1)【提示】设计浏览选项时判断当前工作区是否有打开表用函数USED(工作区号),在提示选项对话框的跳过中输入表达式

USED()=.F.

其它选项请学员自己设计完成

2)【提示】

第一步:建立表单,添加组合框控件,修改表单的LOAD事件代码如下:

public M(2)

M(1)=\学生\

M(2)=\选课\

表单的DESTORY事件中释放公共变量M

第二步:组合框控件的RightClick事件中调用快捷菜单MYM: DO MYM.MPR

第三步:保存表单文件名为MYF.SCX

第四步:建立快捷菜单

在\表文件名\选项中选择\过程\代码如下:myf.combo1.rowsourcetype=0

myf.combo1.rowsource='m(2)'

myf.combo1.rowsourcetype=5

在\学生表字段\选项中选择\过程\代码如下:use 学生

myf.combo1.rowsourcetype=0

myf.combo1.rowsource='学生'

myf.combo1.rowsourcetype=8

在\选课表字段\选项中选择\过程\代码如下:use 选课

myf.combo1.rowsourcetype=0

myf.combo1.rowsource='选课'

myf.combo1.rowSourcetype=8

在\组合/列表框\选项中选择\过程\代码如下:if myf.combo1.style=0

myf.combo1.style=2 else

myf.combo1.style=2

endif

3)【提示】打开第1题菜单，在“常规选项”对话框中选择“顶层表单”复选框，注意要重新生成菜单程序；

将表单的ShowWindow属性设为2，在表单的Init事件中添加调用菜单程序命令

习题十

一、选择题 1)A 2)D 3)B 4)B

二、填空题 1)数据源 布局 2)文件 通用型字段 3)组标头 组注脚 4)“页面设置”对话框的列数

习题十一

一、 选择题 1)B 2)D 3)C 4)D 5)A

二、填空题

1)应用程序框架 2)可以在桌面上运行的.EXE程序

3)在VF主窗口中运行的.APP程序 4)清理 5)向导 全部 6）数

本文来源：https://www.bwwdw.com/article/lwp7.html