发布时间 : 星期五 文章VFP数据库练习题更新完毕开始阅读
A、将输入作为字符型数据接收 B、将输入作为数值型数据接收 C、将输入作为逻辑型数据接收 D、将输入作为备注型数据接收 11．执行命令：ACCEPT \请输入出生日期：\时，如果通过键盘输
入CTOD(\，则MDATE的值应为_________。 A、[CTOD(\ B、\ C、01/01/89 D、拒绝接受，MDATE不赋值 12．一个过程文件最多可以包含128个过程，其文件扩展名是_________。 A、.PRG B、.FOX C、.DBT D、.TXT
13．在用“@ … SAY …” 命令进行格式化输出时，为使输出结果只输出到打印
机上应使用命令________。 A、SET PRINT ON B、SET PRINTER TO LPT1 C、SET DEVICE TO PRINT D、SET PRINTER TO PRN
14．WAIT、ACCEPT和INPUT 三条输入命令中，必须要以回车键表示输入结
束的命令是________。
A、WAIT、ACCEPT和INPUT B、WAIT、ACCEPT C、ACCEPT和INPUT D、WAIT、INPUT
15．设学生数据表当前记录中“计算机”字段的值是89，执行下面程序段之后
的屏幕输出是________。 DO CASE CASE 计算机 < 60 ? \计算机成绩是：\不及格\ CASE 计算机 >= 60 ? \计算机成绩是：\及格\ CASE 计算机 >= 70 ? \计算机成绩是：\中\ CASE 计算机 >= 80 ? \计算机成绩是：\良\ CASE 计算机 >= 90 ? \计算机成绩是：\优\ ENDCASE
A、计算机成绩是：及格 B、计算机成绩是：中 C、计算机成绩是：良 D、计算机成绩是：优
16．执行如下程序，如果输入N值为5，则最后显示值是_________。 SET TALK OFF s = 0 i = 0 INPUT \n=\n DO WHILE s <= n s = s+ i i = i + 1 ENDDO ? s SET TALK ON A、1 B、3 C、5 D、6
21
17．设数据表文件XSCJ.DBF中有8000条记录，其文件结构是：姓名(C, 8)，成
绩(N, 5, 1)。此时若运行以下程序，屏幕上将显示_____。 SET TALK OFF USE XSCJ j = 0 DO WHILE .NOT. EOF( ) j = j + 成绩 SKIP ENDDO ? '平均分：' + STR(j / 8000, 5, 1) RETURN
A、平均分：XXX.X(X代表数字) B、数据类型不匹配 C、平均分：j / 8000 D、字符串溢出
18．执行如下程序，如果输入的m 值为5，则最后p 的输出值为_______。 p = 0 k = 1 INPUT \m=\m DO WHILE p <= m p = p + 1 k = k + 1 ENDDO ? p A、1 B、3 C、5 D、6
19．下列程序执行时，在键盘上输入21，则屏幕上的显示结果为_______。 INPUT \x=\x DO CASE CASE x > 10 ? \ CASE x > 20 ? \ OTHERWISE ? \ ENDCASE A、OK1 B、OK C、OK2 D、OK3 二 读程序写结果
1．写出下列程序运行结果。 STORE 0 TO n, s DO WHILE .T. n = n + 1 s = s + n IF n > 10 EXIT ENDIF ENDDO
22
? \s = \s, 2) RETURN
2．写出下列程序运行结果。 SET TALK OFF m = 1 DO WHILE m < 5 n = 1 ?? m DO WHILE n <= m tt = n + m ?? tt n = n + 1 ENDDO ? m = m + 1 ENDDO RETURN
3．阅读下列程序，并给出运行结果。 SET TALK OFF CLEAR STORE 0 TO x, y, s1, s2, s3 DO WHILE x < 10 x = x + 1 DO CASE CASE INT(x / 2) = x / 2 s1 = s1 + x / 2 CASE MOD(x, 3) = 0 s2 = s2 + s3 CASE INT(x / 2) <> x / 2 s3 = s3 + 1 ENDCASE ENDDO ? s1, s2, s3 SET TALK ON RETURN
4．有以下3个程序，写出执行命令DO TEST后的运行结果。 **TEST.PRG **sub2.prg a = 5 PARAMETER x, y, z b = 10 ? 'x, y, z =' , x, y, z c = 15 x = 31 DO sub1 y = 32 ?'a1, b1, c1=', a, b, c c = 33 DO sub2 WITH a + b, c, 10 DO sub1 ? 'a2, b2, c2=', a, b, c RETURN
23
RETURN **sub1.prg PRIVATE b, c a = 21 b = 22 c = 23 RETURN
5．有以下两个程序，写出执行命令DO MAIN_2后的运行结果。 **MAIN_2.PRG *sub_2.prg SET TALK OFF PRIVATE c PUBLIC a a = a + 1 a = 1 PUBLIC b c = 5 b = 2 DO sub_2 c = 3 ?\返回主程序：a, b, c, d=\a, b, c, d d = 4 SET TALK ON ?\过程中：a, b, c, d=\a, b, c, d RETURN RETURN 三 程序填空
1．下面的程序功能是完成工资查询，请填空： SET TALK OFF USE employee ACCEPT \请输入职工号\num LOCATE FOR 职工号 = num IF __________ DISPLAY 姓名, 工资 ELSE ? \职工号输入错误！\ ENDIF USE
2．下面程序的功能是求1到100之间所有整数的平方和并输出结果，请填空。 SET TALK OFF s = 0 ? DO WHILE (x <= 100) ? ? ENDDO ? s RETURN
3．下列程序用于在屏幕上显示一个由“*”组成的三角形如下，请填空。
* *** ***** *******
24