? ENDFOR RETURN

2. 下列程序用来计算长方形的面积，请将它写完整：

X=3 Y=5 S=0

DO WITH X,Y,S ?S

PROCEDURE AREA S1=X*Y RETURN

3. 阅读下列程序，并填写运行结果 。

CLEAR x=\

STORE \学习\ok=\努力\? &x+(y)

4. 写出程序执行结果 。

SET TALK OFF S=0 N=50

DO WHILE N>5 S=S+N N=N-10 ENDDO

? S

5. 写出程序执行结果 。

29

SET TALK OFF M=3

DO WHILE M<10 N=2

DO WHILE N<=M-1 IF INT(M/N)=M/N EXIT ENDIF IF N=M-1 ? M ENDIF N=N+1 ENDDO M=M+1 ENDDO

6. 给出以下程序的运行结果 。

SET TALK OFF X=0 Y=0

DO WHILE X<10 X=X+1

IF INT(X/2)=X/2 LOOP ELSE Y=Y+X ENDIF ENDDO ?\RETURN

30

练习题七 表单设计

一、选择题

1． 在Visual FoxPro 中，运行表单“学生.SCX”的命令是 。

A) DO 学生 B) RUN FORM 学生 C) DO FORM 学生 D) DO FROM 学生

2． 新创建的表单默认标题为Form1，为了修改表单的标题，应设置表单的 。

A) Name属性 C) Closable属性

B) Caption属性 D) AlwaysOnTop属性

3． 有关控件对象的Click事件的正确叙述是 。

A) 用鼠标双击对象时引发

B) 用鼠标右键双击对象时引发

C) 用鼠标右键单击对象时引发 D) 用鼠标单击对象时引发

4． 在Visual FoxPro中，为了将按钮的Click事件代码设置为表单从内存中释放（清除），

应使用的退出命令是 。 A) ThisForm.Refresh C) ThisForm.Hide

B) ThisForm.Delete

D) ThisForm.Release

5． 以下属于非容器类控件的是 。

A) Form C) Page

B) Label D) Container

6． 假定表单中包含有一个命令按钮，那么在运行表单时。下面有关事件引发次序的陈述中，

正确的是 。

A) 先命令按钮的Init事件，然后表单的Init事件，最后表单的Load事件 B) 先表单的Init事件，然后命令按钮的Init事件，最后表单的Load事件 C) 先表单的Load事件，然后表单的Init事件，最后命令按钮的Init事件 D) 先表单的Load事件，然后命令按钮的Init事件，最后表单的Init事件 7． 如果想用一幅图片来作为表单的背景，可以设置表单的 属性来实现。

31

A) Caption属性 B) Picture属性

C)Name属性 D) Fontsize属性

8． 在创建表单时，如果要同时添加多个同类型控件，可以选择“表单控件工具栏”上

的 ，就可同时添加多个控件。 A)“生成器锁定” C)“按钮锁定”

B)“数据环境”

D)“文本框生成器”

9． 设计表单时，如果要改变标签文本的字体，可使用属性窗口的 属性来设置。

A) Fontname

B) Fontsize

D) Fontcolor

C) Fontbold

10． 每一个表单都可以包含一个数据环境，设置数据环境可以在 中设置。

A)“数据环境设计器” B)“表单设计器” C)“数据环境生成器” D)“数据设计器” 11． 页框（PageFrame）能包容的对象是 。

A) 表单集（FormSet） C) 列（Column）

B) 标头（Header） D) 页面（Page）

12． 下列控件均为容器类的是 。

A) 表单、命令按钮组、命令按钮 C) 表格、列、文本框

B) 表单集、列、组合框

D) 页框、列、表格

13． 子类或对象具有延用父亲的属性、事件和方法的能力，称为类的 。

A) 继承性 C) 封闭性

B) 抽象性 D) 多态性

14． 以下都是VFP中的对象，其中不能直接加到表单中的对象是 。

A) Grid

B) Colum

C) CommandGroup D) Text

15． 如果要让一个文本框中显示的值不能更改，应该设置 属性为.F.。

A) ReadOnly C) Hidden

B) Enabled

D) Disabled

16． 能够将表单的Visible属性设置为.T.，并使表单成为活动对象的方法是 。

A) Hide

32

B) Show