VF练习模拟题.doc

VF模拟题一、 填空题：1. 在VF中，用PUBLIC命令定义变量后，该变量的初值是_2. 请将数学表达式： 转换成VF表达式_3. 在VF中，RECNO（3）表示的含义是_4. 在VF中，为了确保数据库表记录的逻辑正确性，应设置_规则5. 在SQL查询中用于排序的子句是_用于分组的子句是_6. 在VF中，预览报表名为：books.frm的报表，应用命令_二、 单选题:1、 按顺序执行下列命令，显示结果为 ( )STORE 10 TO RC=”2*R”?C?&CA 20 20 B 2*R 2*RC 2*R 20 C 20 2*R2、程序到最后,Y1和Y2的值是( ) CLEAR STORE 0 TO Y1,Y2 X=10 DO WHILE X1IF SQRT(X)=3 OR INT(X/2)=x/2 Y1=Y1+XELSE Y2=Y2+XENDIFX=X-1ENDDO?Y1=+STR(Y1,2),Y2=+STR(Y2,2)A Y1=39 Y2=15 B Y1=15 Y2=15 C Y1=10 Y2=15 D Y1=29 Y2=153、vf查询文件中保存的是：（ ）A.查询命令 B 查询结果 C 与查询有关的基表 D 查询条件4、在Visual FoxPro应用中，任何控件都具有一个共同的属性是（ ） AText . BFont . CName DCaption5、视图不能单独存在,它必须依赖于( ) A 视图 B 数据库 C 表单 D 查询6、要改变表单上表格对象中当前显示的列数，应设置表格的（ ）属性。 A)ControlSource B)RecordSource C)ColumnCount D)Name三、 多选题：1、 在VF中，顺序执行以下代码，要选择XSCJ表作为当前表，可执行的选项是( )Use xsdaUse xscj in 3A select 3 B select(3) C select xscj D select C四、判断题：1、EOF（）函数的作用是测试表的记录指针是否在最后一条记录上( )2、在查询语句中，having只能和GROUP BY 连用（ ）3、FOR循环的初值不能大于终值（ ）4、在VF中，用于设置控件是否可见的属性是enable（ ）五、程序填空：（每空2分） 1、设有学生数据库sdb。下面的VisualFoxPro程序能根据学生键人的学号判断该学生是否存在。如果存在,使用SQL SELECT语句显示学生的学号、姓名和平均成绩。请在下划线处填上适当内容,使程序能正确运行。SET TALK OFFOPEN DATABASE sdbPRIVATE key_no,keySELECT 1USE STUDENT ORDER TAG noDO WHILE .T. CLEAR ACCEPT 请输入学号: TO key_no SEEK key_no IF FOUND()SELECT student.学号,姓名,avg(成绩) AS 平均成绩 FROM student,sc ; WHERE _ ELSE WAIT 该学号的学生不存在,按任意键继续ENDIFWAIT 如果退出,请按Y键! TO _ IF UPPER(key)= _ _ ENDIFENDDOUSERETURN2、 下列程序是计算1!-3!+5!-7!+9!,请补充完整：Clear Clear all _ For i=1 to 5 If _ S=s+jc(i) Else S=s-jc(i) EndifEndforFunction _N=1 For i=1 to x N=n*i Endfor _Endfunc3、 下列程序是输出如右图形，请将程序补充完整：Clear Clear 第60列 For i=1 to 5 i,_ For j=1 to _ If _ ?str(i-j+1,1) Else _ endif Endfor endfor4、下列程序的功能是求出输出的10个数中最大的数，请补充完整： clearFor i=1 to 10Input “请输入一个数：” to x If i=1 &判断用户是不是输入的第一个数 _ Endif If a=j ?str(j-i+1,1)4、a=x endfor ,a 六、编程题；1、use kscj Replace zf with yw+sx+yy+jsjzh all2、alter table kscj add 学校代码 c(2)3、replace 学校代码 with substr(kh,5,2) all4、sele count(a.kh) as 参考人数, b.学校名from kscj a,学校代码 b where a.学校代码=b.学校代码 group by 学校代码; into table 学校上线情况 sele count(a.zf)as 上本科人数, b.学校名from kscj a,学校代码 b where a.学校代码=b.学校代码and zf=540 group by 学校代码 into curos abc fiedname=fields(2) apped(fiedname)sele count(a.zf)as 上专科人数, b.学校名from kscj a,学校代码 b where zf=450 group by 学校代码 into curos abcfiedname=fields(2) apped(fiedname) alter table 学校上线情况 add 本科上线率n(5,2)，专科上线率n(5,2) replace 本科上线率 with 上本科人数/参考人数,专科上线率 with 上专科人数/参考人数 all alter table 学校上线情况 drop 上本科人数，上专科人数list&将字段追加到表中function apped(A)al