FOR n=1 TO THISFORM.List1.ListCount
IF ALLTRIM(THISFORM.List1.List(n))= fl=.F. ENDIF ENDFOR IF fl
THISFORM.List.ADDITEM(THIS.Value) &&向列表框添加新的数据项 ENDIF
THIS.Value=SPACE(1) &&使文本框清空
24．图1所示的表单用于浏览教师（js）信息。为了在表格控件中以不同的背景色显示男、女教师的信息，则在表格控件的Init事件代码中，可使用如下形式的语句：
THIS. (11) ( “DynamicBackcolor”, “IIF(xb = ?女?，RGB（125，125，125），； RGB（125，125，225））”, “Column”）
表单中下拉列表框的RowSourceType属性为“6--字段”，数据源为系名代码表（表的文件名为xmdm.dbf,含系代码（xdm）和系名（xim）两个字段），为了使下拉列表中显示系代码和系名两列数据，则RowSource属性值应为：xmdm.xdm， （12） 。
25．设某表单上有一个页框控件，该页框控件的PageCount属性值在表单的运行过程中可变（即页数会变化）。如果要求在表单刷新时总是指定页框的最后一个页面为活动页面，则可在页框控件的Refresh事件代码中使用语句：THIS. (14) =PageCount。
26．某数据库中包含课程（kc）表和成绩（cj）表，课程表中含有课程代号（kcdh）、课程名（kcm）和学分（xf）等字段，成绩表中含有学号（xh）、课程代号（kcdh）和成绩（cj）等字段。已创建一个按课程代号查询学生成绩的表单如图2所示。
21
图2
表单中下拉列表框（Combo1）的数据源设置如下： RowSourceType属性为：6—字段 RowSource属性为：kc.kcdh。
在下拉列表框中选择某一课程代号后，表格控件（Grid1）立即显示该课程所有学生的成绩，且在文本框（Text1）中显示该课程的课程名，则应在下拉列表框的 （21） 事件中编写如下代码： SELECT kc
THISFORM. Text1.Value=kc.kcm THISFORM. Grid1.RecordSource=;
“SELECT cj.xh, cj.cj FROM cj WHERE cj.kcdh = ALLT(THIS.Value)INTO CURS tmp” THISFORM. Refresh
根据以上代码可判定，表格控件（Grid1）RecordSourceType属性为 （22） 。
27．设某命令按钮的标题为“确定（Y）”（该按钮访问键为“Alt + Y”）,则其Caption属性值应设置为 （23） 。
28．在事件代码中相对引用当前表单集的关键字是 （24） 。
29．文本框控件的 （25） 属性设置为“*”时，用户键入的字符在文本框内显示为“*”，但Value属性中仍保存键入的字符串。 30．已知有三张表：学生表（xs）、课程表（kc）和成绩表（cj），其表结构如表3所示。
表3 表结构说明
学生表（xs.dbf） 学号 姓名 性别 xh xm xb C，10 C，8 C，2 成绩表（cj.dbf） 学号 课程号 成绩 xh kcdh cj C，10 C，3 N，3 课程表（kc.dbf） 课程号 课程名 学分 kcdh kcm xf C，3 C，18 N，2 有一张表单如图3所示，其左边是一个选项安钮组（Optiongroup1）,右边是列表框（List1）。该表单的功能是：在选项按钮组中选择一个年级（学号的前两位表示年级），列表框将显示出该年级所有课程不及格的学生的学号、姓名、课程名称和成绩。
22
图3
下列是选项按钮组的相关事件的事件代码，试完善下面的程序。 DO CASE
CASE THIS.Value=1 nJ= “99”
CASE THIS.Value=2 nJ= “00”
CASE THIS.Value=3 nJ= “01”
CASE THIS.Value=4 nJ= “02” (28) SQL1= ?SELECT xs.xh, xm, kcm, cj? SQL2= ?FROM xs, cj, kc?
SQL3= ?WHERE xs.xh=cj.xh AND cj.kcdh=kc.kcdh AND cj<60? SQL4= (29) SQL5= ?ORDER BY 4?
SQL6= ?INTO CURSOR temp?
SQLSELECT=SQL1+SQL2+SQL3+SQL4+SQL5+SQL6 ThisForm.List1.RowSourceType = 3
ThisForm.List1.RowSource= (30) ThisForm.List1.Requery
31.有一表单FrmA,该表单中包含一个页框PgfB,页框中包含的页面数未知。在刷新表单时，为了刷新页框中的所有页面，可在页框PgfB的Refresh方法中编写一段循环结构的代码实现，请完善如下代码：
FOR i=1 TO THIS. THIS.Pages( i ).Refresh ENDFOR
（2）.设表单集FrmSet1中含有若干张表单，将奇数表单的背景颜色设为淡蓝色，偶数表单的背景颜色设为系统省略值（即保持原定义的）。完善以下FrmSet1表单Init事件代码。(P50页15题)
FOR n=1 TO
IF n%2=0 ENDIF
THIS.FORMS(n).BackColor=RGB(128,255,255) ENDFOR
32.在“表单设计器”中设计的表单有一标签控件， 如右图所示。根据图中的情况，标签控件的AutoSize 属性值为 、Caption属性值为 。 33.设表xs.dbf的结构入下：
23
字段名 Xh Xm Xb Csrq ximing 类型 C C C C C 长度 10 8 2 8 18 小数位 含义 学号 姓名 性别 出生日期 系名 以下是数据环境为xs表的表单，表单上含有两个列表框：“系名列表”（List1）显示各个系的系名，“学生名单”（List2）显示学生的学号和姓名。档选中系名列表中的某个系，在“学生名单”列表中仅显示相应系的学生饿学号和姓名。
表单的Caption属性值应为 ，“学生名单”列表框的ColumnCount属性值最小可为 ，“系名列表”的InteractiveChange事件代码为： xxmm=THIS. THISFORM.List2.RowsourceType=3
THISFORM.List2.Rowsource=”SELECT xh + SPACE(1) +;
xm FORM xs WHERE ” THISFORM.REFRESH
34.某表单含有2个标签对象、2个文本框对象（Text1、Text2）、1个形状对象（Shape1）和1个命令按钮。其中，文本框Text1用来输入圆半径数据，文本框Text2用于显示圆面积，形状对象Shape1用于显示圆的图形，命令按钮的标题属性为“计算”。单击命令按钮时，应完成功能：当圆半径饿值介于10~100之间时（含10和100），形状对象显示圆的图形、计算圆面积并显示之。当圆半径的值介于10~100范围以外时（不含10和100），显示窗口。
完善下列命令按钮的Click事件代码： LOCAL x
x=THISFORM.Text1.value IF
THISFORM.Shape1.Visible=.F. THISFORM.Text2.Value=””
=MessageBox(“半径取值必在10~100之间”，48，“提示窗口”) ELSE
THISFORM.Shape1.Height=x*2 THISFORM.Shape1.Width= x*2 THISFORM.Shape1.Visible=.T.
THISFORM.Text2. value=
24
ENDIF
35. 基于下图所示的表单，要求在输入口令字时，文本框中不出现显示输入内容，每输入一个A～J之间的字符，就显示一个“*”，且要求非A～J之间的字符不接收，输入结果存放到在表单的Activate事件代码中已定义的全局变量MKL中。
完善文本框的KeyPress事件代码，以实现以上功能： PARAMETERS nKeyCode NODEFAULT
IF BETWEEN(nKeyCode, ,74)
THIS.Value=ALLTRIM(THIS.Value)+”*” Mkl=mkl+CHR( ) ENDIF
第九章 练习题
1.下列说法中不正确的是 。
A. 报表包含的三个基本带区是指页标头、细节去及总结区 B. 报表的页标头包含的信息在每页报表中出现一次
C. 向报表中放置对象就是在报表设计区中设置需要打印的内容 D. 设计报表时，如果需要可以为报表设置数据环境
2.在报表设计器中，报表最多可以分为 种不同类型的报表带区（例如，页标头、细节区等）。 A.3 B.5 C.7 D.9
3.报表的常规类型有列报表、行报表、一对多报表和多栏报表。下列有关列报表和行报表的叙述中，正确的是 。
A. 列报表是指报表种每行打印一条记录；行报表是指每行打印多条记录 B. 列报表是指报表种每行打印多条记录，行报表是指每行打印一条记录 C. 列报表是指报表种每行打印一条记录；行报表是指多行打印一条记录 D. 列报表是指报表种每行打印多条记录；行报表是指多行打印多条记录
4.使用报表打印表中的数据，需在报表设计器中将与表字段相关的控件放在报表的 带区。 5.报表是最常用的打印文档，设计报表主要是定义报表的数据源和报表的布局。在VFP系统中，报表布局的常规类型有：列报表、行报表、多栏报表以及 。
6.在设计表单或报表的过程中，打开数据环境设计器后，可以在属性窗口中设置临时表对象的属性。为临时表对象指定主控索引标识的属性以及筛选条件表达式的属性分别是 和 。
7.报表是最常用的打印文档，设计报表主要是定义报表的数据源和报表的布局。VFP中，报表布局的常规类型有：列报表、行报表、一对多报表以及多栏报表。多栏报表指报表中 可以打印多条记录的数据。
8．在报表设计器中，报表被划分为多个带区。其中，打印每条记录的带区称为 （4） 带区。
第十一章 练习题
1.有一菜单文件main.mnx，运行该菜单的操作是 。
25
A. 执行命令DO main.mnx B. 执行命令DO MENUE main.mnx
C. 先生成菜单程序文件main.mpr，再执行命令DO main.mpr D. 先生成菜单程序文件main.mpr，再执行命令DO MENU main.mpr
2.如果要无条件地废止一个菜单项（即让该菜单项变成灰色），则在该菜单项饿“跳过
3.若将SDI菜单menua.mpr附加到某表单中，则必须为表单的Init事件添加代码，该代码内容是：DO menua.mpr WITH ，.T.。
4.在程序运行期间，可以使用SET SYSMENU 命令启用和废止VFP系统菜单栏。废止VFP系统菜单栏的命令是： 。
5．VFP中进行菜单设计时，菜单有两种，即一种菜单和 （1） 菜单。
26