没有合适的资源?快使用搜索试试~ 我知道了~
vfp第二章程序设计基础练习题.doc
需积分: 5 0 下载量 8 浏览量
2022-10-20
07:30:15
上传
评论
收藏 64KB DOC 举报
温馨提示
试读
17页
vfp第二章程序设计基础练习题.doc
资源推荐
资源详情
资源评论
vfp 第二章程序设计基础练习题
一、单项选择题
1 .组成 Visual FoxPro 应用程序的基本结构是( )。
A)顺序结构 分支结构和模块结构 B)顺序结构 分支结构和循环结构
C )逻辑结构 物理结构和程序结构 D)分支结构 重复结构和模块结构
2 .在 Visual FoxPro 中,命令文件的扩展名是( ).
A)TXT B )PRG C )DBF D)FMT
3 .用于声明某变量为全局变量的命令是( ).
A)With B )Private C )Public D)Parameters
4 .能接受一位整数并存放到内存变量 Y 中的正确命令是( )。
A)Wait To Y B)Accept To Y C)Input To Y D )? Y
5 .Visual FoxPro 中的 Do Case Endcase 语句属于( )。
A)顺序结构 B)循环结构 C )分支结构 D)模块结构
6 .在“先判断在工作” 的循环程序结构中,循环体执行的次数最少可以是( ).
A)0 B )1 C )2 D)不确定
7 .若将过程或函数放在过程文件中, 可以在应用程序中使用( )命令打开过程文件.
A)Set Procedure To <文件名〉 B)Set Function To <文件名>
C )Set Program To <文件名〉 D )Set Routine To <文件名>
8 .在 Visual FoxPro 程序中, 注释行使用的符号是( )
A)// B )* C )’ D){ }
9 .Visual FoxPro 循环结构设计中,在指定范围内扫描表文件,查找满足条件的记录并执
行循环体中的操作命令, 应使用的循环语句是( )。
A)For B )While C )Scan D)以上都可以
10.假设有如下程序:
Clear
Use Gz
Do While !Eof( )
If 基本工资〉=800
Skip
Loop
Endif
Display
Skip
Enddo
Use
Return
该程序实现的功能是( )
A)显示所有基本工资大于 800 元的职工信息
B )显示所有基本工资低于 800 元的职工信息
C )显示第一条基本工资大于 800 元的职工信息
D)显示第一条基本工资低于 800 元的职工信息
11 .执行下列程序:
Store 0 To X, Y
Do While X〈20
X=X+Y
Y=Y+2
Enddo
?X, Y
Return
vfp 第二章程序设计基础练习题
在屏幕上显示的输出结果是( ) 。
A)20 10 B )10 20 C )20 22 D)22 20
12.执行下列程序后, 变量 X 的值为( ) .
Public X
X=5
Do Sub
?”X=”, X
Return
Procedure Sub
Private X
X=1
X=X*2+1
Return
A)5 B )6 C )7 D)8
13.下面程序的运行结果是( ) .
Dimension A( 6 )
For K=1 To 6
A( K )=30—3*K
Endfor
K=5
Do While K〉=1
A( K )= A( K )- A( K+1 )
K=K—1
Enddo
?A( 2 ) , A( 4 ) , A( 6 )
Set Talk On
Return
A)12 15 18 B )18 12 15 C )18 15 12 D)15 18 12
14.Loop 语句不能出现在仅有( ) 语句的程序段中
A)Do Enddo B )If Endif C )For Endfor D)Scan Endscan
15.程序如下:
S=0
I=1
Do While I〈4
Accept “请输入字符串: ” To X
If “A" $ X
S=S+1
Endif
I=I+1
Enddo
?S
Return
运行时输入 “abcd”, “ABCD”, “aBcD ”, 输出 S 的值是( )
A)1 B )2 C )3 D)4
16.设表文件 CJ。DBF 中有两条记录, 内容如下:
记录号 XM ZF
1 王燕 300.00
vfp 第二章程序设计基础练习题
2 李明 500.00
此时, 运行以下程序的结果应当是( )
Use cj
m->zf=0
Do While 。Not. Eof( )
m->zf=m—>zf+zf
Skip
Enddo
?m—>zf
Return
A)800。00 B )500。00 C )300。00 D)200.00
17.有如下 Visual FoxPro 程序:
**主程序 zcx.prg ** 子程序 zcx1.prg
Clear k1=k1+’500'
k1=’25’ Return
?k1
Do zcx1
?k1
Return
用命令 Do zcx 运行程序后, 屏幕显示的结果为( ) 。
A)25 B )25 C )25 D)25
500 525 25500 25
18.设表文件 XSCJ。DBF 中有 8000 条记录, 其文件结构是:姓名(C, 8), 成绩(N, 5, 1) 。运行以下
程序, 屏幕上将显示( ) 。
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)字符串溢出
19.执行如下程序
Store “ ” To ans
Do While 。T。
Clear
? “1。 添加 2。删除 3.修改 4.退出”
Accept “请输入选择: ” To ans
If Val(ans)〈=3 。And。 Val(ans)<〉0
Prog=“Prog”+Ans+“.Prg”
Do &Prog
Endif
Quit
Enddo
Return
如果在屏幕上显示 “ 请输入选择: ” 时, 输入 4, 则系统将
剩余16页未读,继续阅读
资源评论
智慧安全方案
- 粉丝: 3614
- 资源: 59万+
上传资源 快速赚钱
- 我的内容管理 展开
- 我的资源 快来上传第一个资源
- 我的收益 登录查看自己的收益
- 我的积分 登录查看自己的积分
- 我的C币 登录后查看C币余额
- 我的收藏
- 我的下载
- 下载帮助
安全验证
文档复制为VIP权益,开通VIP直接复制
信息提交成功