湘潭大学visual foxpro课程考试备考习题21Word格式文档下载.docx
《湘潭大学visual foxpro课程考试备考习题21Word格式文档下载.docx》由会员分享，可在线阅读，更多相关《湘潭大学visual foxpro课程考试备考习题21Word格式文档下载.docx（21页珍藏版）》请在冰豆网上搜索。
主索引只能存放在结构复合索引文件中.
Y
第3题（1.0分）题号:
971
在分支选择结构提供的两种选择中,有并且只有一种选择被执行.
第4题（1.0分）题号:
607
备注型字段用于存放超过256个字符的文本.
第5题（1.0分）题号:
1076
在Record菜单中选择Pack项,可删除当前数据库中所有记录.
第6题（1.0分）题号:
1085
在VisualFoxPro中引用数组时,每一个数组在内存中占用二个存储单元.
第7题（1.0分）题号:
1000
表示满足第二个汉字是"
红"
的所有人的姓名是%红_.
第8题（1.0分）题号:
1027
设表文件中有8条记录,且已打开,当BOF（）为真时,recno（）的返回值为1.
第9题（1.0分）题号:
1112
生成器（Builder）可以独立使用.
━━━━━━━━━━━━━━━━━
三、单项选择共10题（共计10分）
4002
顺序执行下列命令后,最后一条命令显示结果是（）.
USECHJ
GO5
SKIP-2
?
RECNO（）
A:
3
B:
4
C:
5
D:
7
A
3835
数据表中有30个记录,如果当前记录为第3条记录时,把记录指针向
下移动2个记录,测试当前记录号函数RECNO（）的值是（）.
2
C
3076
seek（）函数返回的值为（）型.
字符
数值
日期
逻辑
D
3066
DTOC（{98/09/28}）的值应为（）.
1998年9月28日
98/09/28
″98/09/28″
″98-09-28″
3392
VisualFoxPro中的参照完整性包括（）.
更新规则
删除规则
插入规则
以上答案均正确
3330
要存储员工上下班打卡的日期和时间,应采用哪种数据类型的字段（）.
字符类型
日期类型
日期时间类型
备注类型
3345
拥有焦点的控件对象对应于表单的（）属性.
Parent
Controls
ActiveControl
This
3073
Print方法的作用是在（）对象上打印一个字符串.
Text
Label
Form
EditBox
3150
决定微调控件最大值的属性是（）.
Keyboardhighvalue
Value
Keyboardlowvalue
Interval
第10题（1.0分）题号:
3332
一般情况下,运行表单时,在产生了表单对象后,将调用表单对象
的（）方法显示表单.
Release
Refresh
SetFocus
Show
━━━━━━━━━━━━━━━━
四、多项选择共5题（共计10分）
347
下面关于VisualFoxPro数组的叙述中,正确的是（）.
用DIMENSION和DECLARE都可以定义数组
VisualFoxPro只支持一维数组和二维数组
一个数组中各个数组元素必须是同一种数据类型
新定义数组的各个数组元素初值为.F.
ABD
254
以下表达式中,合法的是（）.
8-3=5
[8]+[3]>
10
AT（"
ad"
"
xyadvanad"
）-len（"
adadad"
）
.not.（a=b）.and.a-b>
0.or.b=0
ACD
253
VisualFoxpro中使用了（）等几种变量形式.
字段变量
数组变量
系统变量
内存变量
ABCD
342
命令文件中可以实现单击一键输入一个字符的命令或函数有（）.
wait
input
inkey（）
@x,xgetVERpict'
x'
338
打开VisualFoxPro"
项目管理器"
的"
文档"
（Docs）选项卡,其中
包含的文件类型有（）.
表单（Form）文件
报表（Report）文件
标签（Label）文件
程序（PRG）文件
ABC
五、程序填空共3题（共计15分）
第1题（5.0分）题号:
793
*-------------------------------------------------------
*【程序填空】
*-------------------------------------------------------
*功能:
列出XSDB.DBF数据表中法律系学生记录，将结果显示输出。
*请在【】处添上适当的内容，使程序完整。
SETTALKOFF
***********SPACE**********
【?
】
DOWHILE.T.
IF系别="
法律"
DISP
ENDIF
【?
IFEOF（）
ENDDO
USE
SETTALKON
RETURN
USEXSDB
=======（答案2）=======
SKIP
=========或=========
SKIP1
=======（答案3）=======
EXIT
第2题（5.0分）题号:
805
*功能：
显示所有100以内的6的倍数的数,并求这些数的和。
I=1
DOWHILEI<
=100
IFMOD（【?
】）=0
?
I
S=S+I
I=I+1
"
S="
S
S=0
I,6
ENDIF
ENDI
第3题（5.0分）题号:
826
现有结构相同的两个数据库，计算机二级库JSJ.DBF和英语
*四级库YY.DBF,含如下字段内容：
学号（C,4）,姓名（C,8）,
*性别（C,2）,专业（C,16）。
要求编一程序，将两个数据库中
*关键字段学号相同的记录从YY.DBF中删除掉，并将其存放
*到结构相同的ER.DBF库文件中，最后显示ER.DBF库中的记
*录内容
SETSAFEOFF
SELE1
USEJSJ
COPY【?
】TOER
INDEON学号TOER
SELE2
USEYY
SETRELATO学号INTOA
GOTOP
SELE3
USEER
DOWHILE.NOT.EOF（）
IF学号=【?
SCATTOM
SELE3
APPEBLANK
】FROMM
SELE2
DELE
SKIP
ENDD
PACK
LIST
CLOSEDATA
STRU
A->
学号
A.学号
JSJ.学号
JSJ->
GATHER
六、程序改错共3题（共计15分）
755
*【程序改错】
*题目：
在RSH.dbf中，查找职工赵红的工资，如果工资小于200元，
*则增加100元；
如果工资大于等于200元且小于500元时，则增
*加50元；
否则增加20元。
最后显示赵红的姓名和工资。
*注意：
不可以增加或删除程序行，也不可以更改程序的结构。
CLEAR
USERSH
***********FOUND**********
LOCATEFOR姓名=赵红
DOCASE
CASE工资<
200
REPLACE工资WITH工资+100
500
REPLACE工资WITH工资+50
OTHERWISE
REPLACE工资WITH工资+20
ENDCASE
LIST姓名,工资
USE
RETU
LOCATEFOR姓名="
赵红"
LOCAFOR姓名='
赵红'
LOCAFOR姓名="
LOCATEFOR姓名=[赵红]
LOCAFOR姓名=[赵红]
LOCATEFOR姓名='
DISP姓名,工资
姓名,工资
DISPLAY姓名,工资
827
*题目:
已有的一个合同管理数据库文件HTGL.DBF，其中包括合
*同号、订货单位、供货单位、订货数量和单价等字段。
*给定程序MODI1.PRG的功能是分别统计不同的订货单位
*数和不同的供货单位数以及所有订货的总金额，并将结
*果填写到TJ.DBF数据库文件中。
SETSAFETYOFF
USEHTGL
INDEXTOTMP1ON订货单位
COUNTTOAA
SETINDEXTO
INDEXTOTMP2ON供货单位
COUNTTOBB
SETINDEXTO
COUNT订货数量TOCC
USETJ
LOCATEFOR统计项目="
订货单位数"
REPLACE数目WITHAA
供货单位数"
REPLACE数目WITHBB
订货总金额"
REPLACE数目WITHCC
INDEUNIQTOTMP1ON订货单位
INDETOTMP1ON订货单位UNIQ
INDEON订货单位TOTMP1UNIQ
INDEUNIQTOTMP2ON供货单位
INDETOTMP2ON供货单位UNIQ
INDEON供货单位TOTMP2UNIQ
SUMALL订货数量*单价TOCC
SUM订货数量*单价TOCC
SUM单价*订货数量TOCC
SUMALL单价*订货数量TOCC
835
有学生数据库STD.DBF文件，其中学号字段的前两位是班号。
*请编写程序MODI1.PRG：
选择所有少数民族（非汉族）的学
*生参加某项活动，按民族的拼音次序升序排列,同民族的按
*照学号升序排列，并为之生成编号。
编号的前两位是班号，
*后两位是统一新编序号。
并将学号、编号、姓名、性别和
*民族添加到数据库文件BS中。
stor0tonum
stor"
"
tobianhao
sele2
usestd
indexon民族,学号tostd.idx
sele1
usebs
zap
dowhile.not.eof（）
if民族="
汉"
num=num+1
bianhao=学号+NUM
SELE1
APPEBLAN
repl学号withb->
学号,编号withbianhao,姓名withb->
姓名,性别withb->
性别,民族withb->
民族
endif
sele2
skip
enddo
CLOSEDATABASE
indexon民族+学号tostd.idx
indeon民族+学号tostd.idx
<
>
subs（学号,1,2）+STR（NUM,1）
left（学号,2）+STR（NUM,1）
七、程序设计共2题（共计10分）
700
*【程序设计】
编程判断一个整数w的各位数字平方之和能否
*被5整除,可以被5整除则返回1,否则返回0。
*将结果存入变量OUT中。
*请按照题目要求，在下面编写程序代码。
SETLOGERRORSON
输入一个整数：
w=39"
OUT=-1
w=39
**********Program**********
**********End**********
DOYZJWITHOUT
SETLOGERRORSOFF
----------------------
s=0
dowhilew>
s=s+（w%10）*（w%10）
w=int（w/10）
enddo
ifs%5=0
out=1
else
out=0
endif
out
684
利用循环程序输出图形：
********
*******
*****
***
********
*并将输出第3行存入变量S中
DOYZJ14WITHS
FORN=1TO5
IFN=1ORN=5
FORM=1TO7
?
*"
ENDFOR
ELSE
FORM=1TO5-N
?
SPACE（2*N-3）
END
升级会员 