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