湘潭大学visual foxpro课程考试备考习题29.docx
《湘潭大学visual foxpro课程考试备考习题29.docx》由会员分享，可在线阅读，更多相关《湘潭大学visual foxpro课程考试备考习题29.docx（20页珍藏版）》请在冰豆网上搜索。
湘潭大学visualfoxpro课程考试备考习题29
试卷编号：
8265
所属语言：
VisualFoxpro
试卷方案：
VF_1004261709
试卷总分：
100分
共有题型：
8种
━━━━━━━━━━━━━━
一、填空共5题（共计10分）
━━━━━━━━━━━━━━
第1题（2.0分）题号:
1444
要使表单中表格的数据只能看不能改,应将该表格的【1】属性设置为真（.T.）.
答案：
=======（答案1）=======
ReadOnly
第2题（2.0分）题号:
1303
首次启动报表设计器时,报表布局中只有3个带区,它们是页标头、【1】和页注脚.
答案：
=======（答案1）=======
细节
第3题（2.0分）题号:
1574
在对数据表进行增加记录操作时,结构复合索引文件【1】修改.
答案：
=======（答案1）=======
自动
第4题（2.0分）题号:
1553
在VisualFoxpro中,使用菜单设计器可以创建下拉式菜单;使用【1】可以创建快捷菜单.
答案：
=======（答案1）=======
快捷菜单设计器
第5题（2.0分）题号:
1194
恢复VisualFoxPro系统菜单的命令是【1】.
答案：
=======（答案1）=======
setmenutodefault
━━━━━━━━━━━━━━
二、判断共9题（共计9分）
━━━━━━━━━━━━━━
第1题（1.0分）题号:
1164
在VFP中,SCAN...ENDSCAN结构可适合任何情况下的循环.
答案：
N
第2题（1.0分）题号:
624
在VisualFoxPro中,store可以将多个常量赋给一个变量.
答案：
N
第3题（1.0分）题号:
992
VisualFoxPro允许您将同一个表重复打开在不同工作区中.
答案：
N
第4题（1.0分）题号:
975
执行?
MOD（4,7）后的结果为0.
答案：
N
第5题（1.0分）题号:
1026
设表文件中有6条记录,且已打开,当EOF（）为真时,recno（）的返回值为7.
答案：
Y
第6题（1.0分）题号:
1098
LIST和DISPLAY命令的功能和在程序中所起到的作用都是一样的.
答案：
N
第7题（1.0分）题号:
1096
CONTINUE命令必须与LOCATE命令配合使用才有意义.
答案：
Y
第8题（1.0分）题号:
622
要取得目前所在环境的帮助,应按F1键.
答案：
Y
第9题（1.0分）题号:
972
执行?
IIF（5>8,2,3）后的结果为2.
答案：
N
━━━━━━━━━━━━━━━━━
三、单项选择共10题（共计10分）
━━━━━━━━━━━━━━━━━
第1题（1.0分）题号:
3395
VisualFoxPro中能够进行条件定位的命令是（）.
A:
SKIP
B:
GO
C:
LOCATE
D:
SEEK
答案：
C
第2题（1.0分）题号:
3869
一数据表中的"婚否"字段为逻辑型,要显示所有已婚人的信息,
应执行命令（）.
A:
LISTFOR婚否
B:
LISTFOR婚否="真"
C:
LISTFOR婚否="已婚"
D:
LIST婚否
答案：
A
第3题（1.0分）题号:
3082
VAL（″1E3″）的值为（）.
A:
1.0
B:
3.0
C:
1000.0
D:
0.0
答案：
C
第4题（1.0分）题号:
3064
?
CTOD（'03/14/08'）的值应为（）.
A:
2008年3月14日
B:
03/14/08
C:
{03/14/08}
D:
″08-03-14″
答案：
B
第5题（1.0分）题号:
3563
打开一个建立了结构复合索引的数据表,表记录的顺序将按（）.
A:
第一个索引标识
B:
最后一个索引标识
C:
主索引标识
D:
原顺序
答案：
A
第6题（1.0分）题号:
4015
有如下一个程序段,执行后,其显示的结果是（）.
DIMENSIONARRAY[3,3]
?
AELEMENT（ARRAY,2,3）
A:
1
B:
3
C:
5
D:
6
答案：
D
第7题（1.0分）题号:
3118
当文本框的BorderStyle属性为固定单线时,其值应为（）.
A:
1
B:
0
C:
2
D:
-1
答案：
A
第8题（1.0分）题号:
3617
两个没有公共属性的关系作自然连接等价于它们作（）.
A:
并
B:
交
C:
差
D:
乘
答案：
D
第9题（1.0分）题号:
3770
在以下关于索引的说明中,错误的是（）.
A:
索引可以提高查询速度
B:
索引可能降低更新速度
C:
索引和排序具有不同的含义
D:
不能更新索引字段
答案：
D
第10题（1.0分）题号:
3599
对于学生关系S（S#,SN,AGE,SEX）,写一条规则,把其中的AGE属性
限制在15-30之间,则这条规则属于（）.
A:
实体完整性规则
B:
参照完整性规则
C:
用户定义的完整性规则
D:
不属于以上任何一种规则
答案：
C
━━━━━━━━━━━━━━━━
四、多项选择共5题（共计10分）
━━━━━━━━━━━━━━━━
第1题（2.0分）题号:
251
VisualFoxPro关系数据库管理系统能够实现的基本关系运算是（）.
A:
排序
B:
选择
C:
投影
D:
联接
答案：
BCD
第2题（2.0分）题号:
355
在VisualFoxpro中,可通过以下方法建立查询文件（）.
A:
利用查询向导创建
B:
利用查询设计器
C:
在命令窗口用命令方式
D:
利用查询分析器
答案：
ABC
第3题（2.0分）题号:
354
在SQLSELECT语句中,以下用于计算检索的函数有（）.
A:
COUNT
B:
MAX
C:
MIN
D:
SUM
答案：
ABCD
第4题（2.0分）题号:
352
在学生数据表文件中有"姓名"字段,要显示所有姓李的学生记录,
使用命令（）.
A:
LISTFORSUBSTR（姓名,1,2）="李"
B:
LISTFOR姓名="李**"
C:
LISTFORSTR（姓名,1,2）="李"
D:
LISTFOR姓名="李"
答案：
AD
第5题（2.0分）题号:
252
VisualFoxpro中的表达式有（）.
A:
算术表达式
B:
字符表达式
C:
关系表达式
D:
逻辑表达式
答案：
ABCD
━━━━━━━━━━━━━━━━
五、程序填空共3题（共计15分）
━━━━━━━━━━━━━━━━
第1题（5.0分）题号:
832
*-------------------------------------------------------
*【程序填空】
*-------------------------------------------------------
*功能:
从读入的整数数据中，统计大于零的整数个数
*和小于零的整数个数。
用输入零来结束输入，
*程序中用变量i统计大于零的整数个数，用变
*量j统计小于零的整数个数。
*请在【】处添上适当的内容，使程序完整。
*-------------------------------------------------------
SETTALKOFF
clear
input"输入整数：
"ton
***********SPACE**********
store【?
】toi,j
***********SPACE**********
dowhile【?
】
ifn>0
i=i+1
endif
ifN<0
j=j+1
endif
input"输入整数：
"ton
***********SPACE**********
【?
】
?
"i=",i
?
"j=",j
settalkon
retu
答案：
=======（答案1）=======
0
=======（答案2）=======
n<>0
=========或=========
n!
=0
=========或=========
n#0
=======（答案3）=======
enddo
=========或=========
endd
第2题（5.0分）题号:
841
*-------------------------------------------------------
*【程序填空】
*-------------------------------------------------------
*功能:
编程求某年第n天的日期。
用数组表示月天数
*请在【】处添上适当的内容，使程序完整。
*-------------------------------------------------------
SETTALKOFF
clear
dimensiona（12）
a
（1）=31
a
（2）=28
a（3）=31
a（4）=30
a（5）=31
a（6）=30
a（7）=31
a（8）=31
a（9）=30
a（10）=31
a（11）=30
a（12）=31
input"year="toy
input"n="ton
ify%4=0.and.y%100!
=0.or.y%400=0
***********SPACE**********
f=【?
】
else
f=0
endif
***********SPACE**********
a
（2）=a
（2）+【?
】
ifn<1.or.n>365+f
?
"输入错误。
"
***********SPACE**********
【?
】
endif
m=1
dowhilen>a（m）
***********SPACE**********
n=n-【?
】
m=m+1
enddo
?
'y=',y,'m=',m,'d=',n
settalkon
canc
答案：
=======（答案1）=======
1
=======（答案2）=======
f
=======（答案3）=======
cancel
=======（答案4）=======
a（m）
第3题（5.0分）题号:
826
*-------------------------------------------------------
*【程序填空】
*-------------------------------------------------------
*功能:
现有结构相同的两个数据库，计算机二级库JSJ.DBF和英语
*四级库YY.DBF,含如下字段内容：
学号（C,4）,姓名（C,8）,
*性别（C,2）,专业（C,16）。
要求编一程序，将两个数据库中
*关键字段学号相同的记录从YY.DBF中删除掉，并将其存放
*到结构相同的ER.DBF库文件中，最后显示ER.DBF库中的记
*录内容
*请在【】处添上适当的内容，使程序完整。
*-------------------------------------------------------
SETTALKOFF
SETSAFEOFF
SELE1
USEJSJ
***********SPACE**********
COPY【?
】TOER
INDEON学号TOER
SELE2
USEYY
SETRELATO学号INTOA
GOTOP
SELE3
USEER
SELE2
DOWHILE.NOT.EOF（）
***********SPACE**********
IF学号=【?
】
SCATTOM
SELE3
APPEBLANK
***********SPACE**********
【?
】FROMM
SELE2
DELE
ENDIF
SKIP
ENDD
PACK
SELE3
LIST
CLOSEDATA
SETTALKON
RETURN
答案：
=======（答案1）=======
STRU
=======（答案2）=======
A->学号
=========或=========
A.学号
=========或=========
JSJ.学号
=========或=========
JSJ->学号
=======（答案3）=======
GATHER
━━━━━━━━━━━━━━━━
六、程序改错共3题（共计15分）
━━━━━━━━━━━━━━━━
第1题（5.0分）题号:
770
*-------------------------------------------------------
*【程序改错】
*-------------------------------------------------------
*题目：
从键盘输入一个表“xsda”，打开该表，查找"姓名"是
*"张三"的记录，并显示该记录，最后输出"姓名"是"张
*三"的记录个数。
（设被打开的表中有固定字段"姓名"）
*-------------------------------------------------------
*注意：
不可以增加或删除程序行，也不可以更改程序的结构。
*-------------------------------------------------------
SETTALKOFF
ACCEPTTOA
USE&A
**********FOUND**********
N=1
SCANFOR姓名="张三"
**********FOUND**********
LIST
N=N+1
ENDSCAN
**********FOUND**********
?
记录个数是,N
USE
SETTALKON
RETU
答案：
=======（答案1）=======
N=0
=========或=========
Store0ToN
=======（答案2）=======
DISPLAY
=========或=========
DISP
=======（答案3）=======
?
"记录个数是",N
=========或=========
?
"记录个数是",str（N）
=========或=========
?
[记录个数是],N
=========或=========
?
[记录个数是],str（N）
=========或=========
?
'记录个数是',N
=========或=========
?
'记录个数是',str（N）
第2题（5.0分）题号:
831
*-------------------------------------------------------
*【程序改错】
*-------------------------------------------------------
*题目:
现有数据库文件XS.DBF，包括：
学号C（6），姓名C（8），计算
*机N（5,1），高等数学N（5,1），英语N（5,1）。
数据库文件
*JXJ.DBF，结构为：
学号C（6），平均分N（5,1），奖学金C（4）
*。
编写MODI1.PRG程序，计算每名学生的平均分和奖学金，并
*将计算结果存入JXJ.DBF文件的相应字段中。
要求JXJ.DBF文
*件中各记录按学号升序排序。
奖学金的计算方法是：
超过全
*班平均分10%为"一等"，超过全班平均分5%为"二等"，其他为
*"无"。
*-------------------------------------------------------
*注意：
不可以增加或删除程序行，也不可以更改程序的结构。
*-------------------------------------------------------
SETTALKOFF
SETSAFETYOFF
SELE2
USEJXJ
ZAP
INDEXON学号TOjxj
SELE1
USEXS
INDEXON学号TOxs
SETRELATO学号INTOb
***********FOUND**********
DOWHILEEOF（）
SELE2
***********FOUND**********
APPE
SELE1
REPLb->学号WITH学号,b->平均分WITH（计算机+高等数学+英语）/3
***********FOUND**********
CONT
ENDDO
SELE2
AVER平均分TOa
REPLALL奖学金WITH"一等"FOR平均分>（a*1.1）
REPLALL奖学金WITH"二等"FOR平均分>（a*1.05）.and.平均分<=（a*1.1）
REPLALL奖学金WITH"无"FOR平均分<=（a*1.05）
CLOSEDATABASE
SETSAFETYON
SETTALKON
RETURN
答案：
=======（答案1）=======
dowhile.not.EOF（）
=======（答案2）=======
APPEBLANK
=======（答案3）=======
SKIP
第3题（5.0分）题号:
829
*-------------------------------------------------------
*【程序改错】
*-------------------------------------------------------
*题目:
已有两个数据库文件ZC.DBF和ZG.DBF。
给定程序MODI1.PRG
*的功能是：
将ZC.DBF和ZG.DBF两个数据库文件的相应记录连
*在一起存入新数据库文件JJ.DBF中，对该数据库文件按职称
*分类汇总实发工资和奖金，再将汇总后的结果复制到ABC.DBF
*数据库文件中，并使该文件只包含职称、奖金和实发工资三
*个字段。
*-------------------------------------------------------
*注意：
不可以增加或删除程序行，也不可以更改程序的结构。
*-------------------------------------------------------
SETTALKOFF
SETSAFETYOFF
SELECT1
USEZG
SELECT2
USEZC
***********FOUND**********
JOINWITHATOJJ
USEJJ
***********FOUND**********
INDEXON职工号TOZCHZ
TOTALON职称TODDDFIELDS实发工资,奖金
USEDDD
***********FOUND**********
COPYTOABCFOR职称,奖金,实发工资
USEABC
LIST
CLOSEDATABASE
SETTALKON
RETURN
答案：
=======（答案1）=======
JOINWITHATOJJFOR职工号=A->职工号
=========或=========
JOINWITHZGTOJJFOR职工号=ZG->职工号
=========或=========
JOINWITHATOJJFOR职工号==A
=======（答案2）=======
INDEON职称TOZCHZ
=======（答案3）=======
COPYTOABCFIEL职称,奖金,实发工资
=========或=========
COPYFIEL职称,奖金,实发工资TOABC
━━━━━━━━━━━━━━━━
七、程序设计共2题（共计10分）
━━━━━━━━━━━━━━━━
第1题（5.0分）题号:
733
*-------------------------------------------------------
*【程序设计】
*-------------------------------------------------------
*题目：
编程找出一组数中最大值和最小值，并将最大值和最小值
*之和存入变量OUT中。
*请按照题目要求，在下面编写程序代码。
*-------------------------------------------------------
SETTALKON
SETLOGERRORSON
dimearray（10）
array
（1）=10
array
（2）=3
array（3）=6
array（4）=96
array（5）=4
array（6）=23
array（7）=35
array（8）=67
array（9）=12
array（10）=88
OUT=-1
**********Program**********
**********End**********
DOYZJWITHOUT
SETLOGERRORSOFF
SETTALKOFF
答案：
----------------------
storearray
（1）tomax,min
fori=1to10
ifarray（i）>max
max=array（i）
endif
ifarray（i）min=array（i）
endif
endf
out=max+min
?
out
----------------------
第2题（5.0分）题号:
738
*-------------------------------------------------------
*【程序设计】
*-------------------------------------------------------
*题目：
编程求P=1-1/（2×2）+1/（3×3）-1/（4×4）+1/（5×5）。
*将结果存入变量OUT中，要求用DoWhile语句实现。
*-------------------------------------------------------
SETTALKON
SETLOGERRORSON
OUT=-1
**********Program**********
**********
升级会员 