时间紧，任务重，帮忙做几道Foxpro测试题，分没问题，版主请别删，中午就结贴。

Question

忘了贴题了:)7. Visual FoxPro系统命令序列如下：
    SELECT B
    USE STU1.DBF
    GO 4
    SELECT C
    USE STU2.DBF
    GO 5
    SELECT 3
    DISP
    最后一条命令显示的记录是: 
    A)2号工作区的第5条记录          B)3号工作区的第5条记录
    C)2号工作区的第4条记录          D)3号工作区的第4条记录8. 在Visual FoxPro系统循环语句结构中:
    DO WHILE <条件>
    <命令序列>
    ENDDO
    进入循环的条件是:
A)条件为真      B)条件为假     C)任何逻辑表达式     D)A、B、C都行10. Visual FoxPro系统可以建立的菜单形式有几种?
    A)1      B)2       C)3       D)4写出下面程序运行结果:
1. 若XSDA.DBF数据表中有20个记录，试写出下面三组命令的执行结果:
    A) USE XSDA           B) USE XSDA           C) USE XSDA
       GO 10                 SKIP 9                GO BOTTOM 
       SKIP -6               GO 1                  SKIP 
       ? ERCNO()             ? BOF()               ? EOF()
       结果为:               结果为:               结果为:
2. 写出下面程序运行的结果:
    SET TALK OFF                        结果是:
    X=1
    I=2
    DO WHILE I<10
      X=X+I
      I=I+2
      ? ”X=”,X,”I=”,I
    ENDDO
3. 写出下面程序运行的结果。数据表STU.DBF内容如下:
Record# 学号 姓名 性别 工资
1 0011001 赵国庆 男 640.00
2 0011003 钱新新 女 530.00
3 0109042 孙建生 男 300.00
4 0109004 李亚萍 女 500.00
5 0223007 周  妍 女 300.00
6 0223005 吴  锋 男 500.00
    SET TALK OFF
    USE STU.DBF                         结果是:
    LOCATE ALL FOR 工资<=500
    CONT
    CONT
    STORE 学号 TO XH
    XM=姓名
    ? RECNO(),XH,XM
    USE
4. 写出下面程序运行的结果。数据库STU.DBF内容如下:
Record# 学号 姓名 性别 年龄
1 0211001 刘大有 男 25
2 0211003 李秀梅 女 23
3 0209042 王立新 男 27
4 0209004 郑小红 女 23
5 0223007 孙捷 女 26
6 0223005 郝建设 男 24
    SET TALK OFF 结果是:
    USE STU.DBF
    STORE 1000 TO AGE
    DO WHILE .NOT.EOF()
      IF 年龄<=AGE
         AGE=年龄
         STORE 姓名 TO NAME
      ENDIF
      SKIP
    ENDDO
    ? ’姓名’,NAME
    ? ’年龄’,AGE

Answer 1

还有一组：
5. 在Visual FoxPro命令窗口中，输入下面命令后的结果是：
    USE A:ZGGZ.DBF
    GO BOTTOM
    SKIP 
    ? EOF()
    A)不正确       B).T.         C).F.          D)0
6. Visual FoxPro系统命令序列如下：
    SELECT C
    USE GZ1.DBF
    GO 4
    SELECT D
    USE GZ2.DBF
    GO 6
    SELECT 4
    DISP
    最后一条命令显示的记录是: 
    A)GZ1.DBF数据库的第4条记录          B)GZ1.DBF数据库的第6条记录
    C)GZ2.DBF数据库的第4条记录          D)GZ2.DBF数据库的第6条记录
7. Visual FoxPro系统的程序如下:
    X=100
    DO WHILE .T..AND.X=100
    ? X=X+1
    ENDDO
    运行该程序后:
    A)显示101后程序运行结束               B)该程序的循环体一次都不会执行 
C)该程序运行后永远不会停止            D)该程序语法有错三、写出程序运行结果（20分）
1. 写出下面程序运行结果:
    SET TALK OFF
    STORE 0 TO X,Y                   结果是:
    DO WHILE X<10
      X=X+1
      IF INT(X/2)=X/2
        LOOP
      ELSE
        Y=X+Y
        ? Y
      ENDIF
     ENDDO
2. 写出下面程序运行结果:
    SET TALK OFF      结果是:
    STORE 5 TO B
    S=0
    DO WHILE 18>=B
       S=S+B
       ? ’S=’,S,’B=’,B
       B=B+3
    ENDDO
3. 写出下面程序运行结果。数据表STUDENT.DBF内容如下:
Record# 学号 姓名 性别 工资
1 0011001 赵国庆 男 640.00
2 0011003 钱新新 女 530.00
3 0109042 孙建生 男 300.00
4 0109004 李亚萍 女 500.00
5 0223007 周  妍 女 300.00
6 0223005 吴  锋 男 500.00
    SET TALK OFF 结果是:
    USE STUDENT.DBF
    STORE 1000 TO GZ
    DO WHILE .NOT.EOF()
      IF 工资<=GZ
        GZ=工资
        STORE 姓名 TO XM
      ENDIF
      SKIP
    ENDDO
    ? ’姓名：’,XM
    ? ’工资’,GZ4. 用文字叙述下面程序的功能， ZGGZ.DBF数据表内容如下:
Record# 姓名 性别 工资
1 赵国庆 男 640.00
2 钱新新 女 530.00
3 孙建生 男 500.00
4 李亚萍 女 300.00
5 周  妍 女 300.00
6 吴  锋 男 300.00
7 王宏民 男 600.00
8 祖笑林 男 670.00
9 王  芳 女 820.00
10 林呼家 男 650.00
SET TALK OFF      该程序的功能是:（仅用文字叙述，不用逐条命令解释）
USE ZGGZ.DBF
GO BOTTOM
SKIP –6
DELETE NEXT 3
PACK 

Answer 2

发错地方了吧，看你没在foxpro版面发嘛。
第一组7、b
8、a
10、3
1.a、4 (若是ERCNO()则ercno.prg不存在)
1.b、.f.
1.c、.t.
2、X=       3 I=    4
   X=       7 I=    6
   X=      13 I=    8
   X=      21 I=   10
3、5 022307 周  妍
4、姓名 郑小红
   年龄 23

Answer 3

还在学Foxpro，教育没有跟上时代的发展

Answer 4

5.  B
6.  D
7.  D  （程序有错 ?x=x+1 不能这样写）
三、写出程序运行结果
1. 1
   4
   9
  16
  25
2.
S=     5 B=    5
S=    13 B=    8
S=    24 B=   11
S=    38 B=   14
S=    55 B=   17
3.
姓名：孙建生
工资 300.00
4. 永久删除4、5、6 三条记录

Answer 5

没有foxpro版，我在其他语言版也发了，但是没人应,多谢

Answer 6

第一组7、b
8、a
10、3
1.a、4 (若是ERCNO()则ercno.prg不存在)
1.b、.f.
1.c、.t.
2、X=       3 I=    4
   X=       7 I=    6
   X=      13 I=    8
   X=      21 I=   10
3、5 022307 周  妍
4、姓名 郑小红
   年龄 23