VF全部复习题(3)

return .T. ⑦ 图1 设计界面 endif

4.设计如图1所示的表单，其中文本框Text1、Text2的初值均为0，其功能是在文本框Text1中输入任意一个正整数，单击“计算”命令按钮，能够在文本框Text2中得到该数的阶乘；单击“关闭”命令按钮，可以关闭表单。请完善下列属性和事件代码。

（1）文本框Text1、Text2的Value属性的值为0； （2）“计算”命令按钮的click事件代码： X=1

for N=1 to THISFORM.TEXT1.VALUE ⑧ X=X*N Endfor

THISFORM.TEXT1,VALUE=X ⑨

(3)“关闭”命令按钮的click事件代码： THISFORM.RELEASE ⑩

四、读程序写出运行结果（每小题5分，共20分） 1.设有数据表ST.DBF的结构内容如下：

记录号 学号（C） 性别（C） 成绩（N） 1 001 男 86 2 122 女 62 3 225 男 58 4 220 女 79 5 010 女 89

设计如图2所示表单，将st.dbf添加到表单的数据环境中,表单运行后,单击命令按钮”command1”,标签Label1将显示什么?

Command1 控件的click事件代码: X=1 Cj=成绩 SCAN

IF 成绩>cj

cj=成绩

x=RECNO() 图2 设计界面 ENDIF ENDSCAN GO x

thisform.refresh

z=学号+space(2) +性别+space(2)+allt(str(成绩)) thisform.Label1.caption=z 答案：010 女 89

2.有一表单程序的运行界面如图3所示。

图3 数据处理 以下是其文本框控件的valid事件代码。程序运行后，在文本框输入“45673”。请写出程序运行结果（文本框的新值）。 x=val(thisform.text1.value)

y=100

do while x>0 y=y-x x=int(x/10) enddo

thisform.text1.value=str(y) 答案：75

3.下面程序运行时输入5,请写出程序执行结果。 SET TALK OFF Clear

INPUT “请输入层数” TO N FOR K=1 TO N ??SPACE(N－Ｋ) FOR J=1 TO K ？？“*”

ENDFOR ? ENDFOR 答案：* **

*** **** *****

4. 以下程序的运行结果是什么？

主程序main.prg *sub1.prg *sub.prg Para b priv a Clear priv c a=2 a=1 a=10 b=2*a b=2 b=20 ?a,b,c c=3 c=30 retu do sub 1 with a ?a,b,c ? a ,b , c do sub2 Retu retu 答案：20 30 2 4 30 4 2 3

五．程序设计题（共20分，第1小题8分，第2小题12分） 1．编写一个程序计算：S=1+2+3+?+N，N值由用户确定。 2.设有学生表，成绩表和课程表的表结构如下： 学生表（xf.dbf）：学号/C/3, 姓名/C/6, 性别/C/2。 成绩表（cj.dbc）：学号/C/7(有重复值)，课程号/C/4(有重复值)，考试成绩/N/5/1。 课程表（kc.dbc）：课程号/C/4,课程名/C/12. 按如下要求编写一个程序：

根据以上三个表，通过键盘任意输入一个课程的课程号，按如下格式显示课程名以及选修该门课程的学生姓名、成绩，

计算并显示该门课程的平均分、最高分和最低分,其格式如下： 选修的课程号：XXXXXX 课程名：XXXXXX 学生姓名 成绩 ?? ?? ?? ??

平均分：XXX.X 最高分：XXX.X 最低分：XXX.X

答案： 1. Clear

Input”请输入N的值” to N S=0 T=1

DO WHILE T<=N S=S+T T=T+1 ENDDO

?”1+2+3+……+N=”,S RETURN 2.

Select 1 Use xs

Inde on 学号 tag kch Select 2 Use kc

Inde on 课程号 tag kch Select 3 Use cj

Set relation to 学号 into xs

Set relation to 课程号 into kc additive Accept “输入课程号：” to kch Locate for 课程号=kch

?”选修的课程号：”+kch+” 课程号：“+kc.课程号 ?”学生姓名 成绩” Do while not eof()

?xs.姓名,考试成绩 Continue Enddo

Calculate avg(考试成绩),max(考试成绩),min(考试成绩)to pjf,zgf,zdf for 课程号=kch ?”平均分：”,str(pjf,5,1),”最高分：”,str(zgf,5,1),”最低分：”,str(zdf,5,1) Return

Visual FoxPro 2008年11月笔试试题

一、单项选择题 （每小题1分，共30分） 1. DBMS的中文意思是（ ）。 B A) 对象－关系型数据库系统 B）数据库管理系统 C) 关系数据库系统 D）结构化查询语言 2．下列Visual FoxPro表达式中运算结果为日期型的是（ ）。 C A) 11/05/08+2 B) CTOD(\C) CTOD(\ D) DATE()+\3．表达式10>3>1的结果是（ ）。 D A) .T. B) .F. C) 10 D) 非法表达式 4．顺序执行以下赋值命令之后，表达式错误的是（ ）。 B A=\B=2*4 C=\

A) &A+B B) &B+C C）VAL(A)+B D) STR(B)+C 5．在执行命令A=\和B=A=\之后，A和B的值分别是（ ）。 B A) \和\ B) \和.F. C) \和\ D) \和\

6．在等级考试数据表DJKS.DBF中，有一字段“报名日期”为日期型且为主控索引，要查询报名日期为2008年9月20日的记录，应使用命令（ ）。 C A）FIND报名日期=CTOD(\ B）FIND 09/20/08 C）SEEK CTOD(\ D）SEEK 报名日期=CTOD(\7．数据库表的字段或记录可以定义有效性规则，规则可以是（ ）。 A A）逻辑表达式 B）字符表达式 C）数值表达式 D）前3种都可能 8．在Visual FoxPro中，下列说法正确的有（ ）。 A A) 赋值号（=）一次只能给一个变量赋值，而STORE一次能给多个变量赋值 B) 一个简单变量和数组在使用之前均可不必先定义

C) 内存变量的内容可以根据需要而修改，但其类型不能更改 D) 对于数组而言，一次只能给其中一个数组元素赋值 9．将数据库表从数据库移出后，该表（ ）。 A A）成为自由表 B）被删除 C）放入回收站 D）内容被清空 10．下列命令使用时不要求对数据表进行索引或排序的是( )。 B A）SEEK，LIST B）LOCATE，COPY C）TOTAL，LOCATE D）FIND，LOCATE 11．在下面关于面向对象的叙述中，错误的是（ ）。 D A) 每个对象在系统中都有惟一的标识。

B) 事件作用于对象，对象识别事件并作出相应动作（或方法）。 C) 一个子类能够继承其父类的所有属性和方法。 D) 一个父类包括其所有子类的属性和方法。 12．如果想在运行表单Form1时，向表单中的文本框Text2中输入字符，回显字符显示的是*号，则可以在Form1的Init事件中加入语句（ ）。 D A）Form1.Text2.PasswordChar=\ B）Form1.Text2.Password=\

C）Thisform.Text2.Password=\ D）Thisform.Text2.PasswordChar=\13．某数据表有字段：学号/C、生日/D、成绩/N等。要建立学号、成绩、生日的组合索引，其索引关键字表达式是（ ）。D

A）学号+成绩+生日 B）\学号\成绩\生日\

C）学号+STR(成绩,5,1)+STR(生日,8) D）学号+STR(成绩,5,1)+DTOC(生日,1) 14．在SQL的查询语句中，实现投影操作的短语为（ ）。 A A) SELECT B) FROM C) WHERE D) JOIN ON 15.下列哪种类型字段的宽度是由用户自己设定的( ) B A）逻辑型 B）数值型 C）备注型 D）日期型 16.用二维表来表示实体与实体之间联系的数据模型是（ ） A A）关系型 B）结构型 C）层次型 D）网状型 17.已知D=\则表达式100+&D 的计算结果是（ ）。 C A）日期型 B）字符型 C）数值型 D）数据类型不匹配 18.执行下列命令的结果是（ ） D

?IIF(SUBSTR(\ARTYPE(\ A）N B）C C）U D）0.00 19.一个表文件中多个备注型（MEMO）字段的内容存放在（ ）。 B A）一个表文件中 B）一个备注文件中 C）多个备注文件中 D）一个文本文件中 20.SQL的数据操作语句不包括（ ）。 D A）INSERT B）UPDATE C）SELECT D）CHANGE 21.SQL查询时，用WHERE子句指出的是 ( ) C A）查询目标 B）查询结果 C）查询条件 D）查询视图

22.在Visual FoxPro中释放和关闭表单的方法是( ) A A）RELEASE B）CLOSE C）DELETE D）DROP

23.在一个数据表中，有一个或若干个字段，它们的值可以惟一的标识一条记录，这样的字段称为（ ）。 C A) 主题字 B）标题 C）关键字 D）记录名 24.已知数据表“职工.DBF”（职工号，姓名，??）和“工资.DBF”（职工号，基本工资，津贴，奖金，扣款），要查询职工实发工资的SQL命令是（ ）。 C A) SELECT 姓名,(基本工资+津贴+奖金-扣款) AS 实发工资 FROM 工资

B) SELECT 姓名,(基本工资+津贴+奖金-扣款) AS 实发工资 FROM 工资 WHERE 职工.职工号=工资.职工号 C) SELECT 姓名,(基本工资+津贴+奖金-扣款) AS 实发工资 FROM 工资,职工 WHERE 职工.职工号=工资.职工号 D) SELECT 姓名,(基本工资+津贴+奖金-扣款) AS 实发工资?FROM 工资 JOIN 职工 WHERE 职工.职工号=工资.职工号

25.字符串长度函数LEN(SPACE(5)-SPACE(5))的值是（ ）。 D A) 0 B) 2 C) 5 D) 10 26. 当前数据表中含有“性别”为字符型的字段，在下面四组命令中，可以找到第二个性别为男的记录的命令是（ ）。 C

A) LOCATE FOR 性别=\男\ B）LOCATE FOR 性别=\男\ NEXT 2

C) LOCATE FOR 性别=\男\ D) LOCATE FOR 性别=\男\CONTINUE SKIP 27.扩展名为.SCX的文件是（ ）。 B A）备注文件 B）表单文件 C）项目文件 D）菜单文件

百度搜索“77cn”或“免费范文网”即可找到本站免费阅读全部范文。收藏本站方便下次阅读，免费范文网，提供经典小说综合文库VF全部复习题(3)在线全文阅读。