VF考试试题.docx
- 文档编号:2224463
- 上传时间:2023-05-02
- 格式:DOCX
- 页数:90
- 大小:34.89KB
VF考试试题.docx
《VF考试试题.docx》由会员分享,可在线阅读,更多相关《VF考试试题.docx(90页珍藏版)》请在冰点文库上搜索。
VF考试试题
第一套
*【程序改错】
*-------------------------------------------------------
*题目:
从键盘输入一个数X,当X大于0、Y的值为1;当X等于0、Y的
*值为0;当X小于0、Y的值为-1,然后输出Y的值。
*-------------------------------------------------------
*注意:
不可以增加或删除程序行,也不可以更改程序的结构。
*-------------------------------------------------------
SETTALKOFF
INPUT"输入一个数X:
"TOX
***********FOUND**********
IFX>0
IFX>0
Y=1
ELSE
Y=0
ENDIF
ELSE
Y=-1
ENDIF
***********FOUND**********
?
"Y=Y"
SETTALKON
RETU
答案:
IFX>=0
?
"Y=",Y
2.
*-------------------------------------------------------
*【程序改错】
*-------------------------------------------------------
*题目:
计算1!
+3!
+9!
的结果并输出。
*-------------------------------------------------------
*注意:
不可以增加或删除程序行,也不可以更改程序的结构。
*-------------------------------------------------------
SETTALKOFF
M=1
S=0
DOWHILEM<=9
STOR1TOI,P
P=1
***********FOUND**********
DOWHILEI>M
P=P*I
I=I+1
ENDDO
S=S+P
***********FOUND**********
M=M+3
ENDDO
?
"1!
+3!
+9!
=",S
SETTALKON
RETU
答案:
检查代码项:
DOWHILEI<=M|DOWHILEM>=I
M=M*3|M=3*M
3.*-------------------------------------------------------
*【程序改错】
*-------------------------------------------------------
*题目:
在XSDB.DBF中查找学生徐秋实的记录,如果找到则将该记录
*的系别、姓名,两科科目名称和对应的成绩显示在屏幕上,否则
*显示:
"查无此人!
"。
*-------------------------------------------------------
*注意:
不可以增加或删除程序行,也不可以更改程序的结构。
*-------------------------------------------------------
SETTALKOFF
USEXSDB
***********FOUND**********
FINDFOR姓名="徐秋实"
IF.NOT.FOUND()
?
"查无此人!
"
ELSE
***********FOUND**********
?
系别,姓名,"计算机="+计算机,"英语="+英语
ENDIF
USE
SETTALKON
RETURN
答案:
?
系别,姓名,"计算机="+STR(计算机),"英语="+STR(英语)|?
系别,姓名,"计算机=",计算机,"英语=",英语
学生代码项:
?
系别,姓名,"计算机="+计算机,"英语="+英语
检查代码项:
LOCATEFOR姓名="徐秋实"|LOCAFOR姓名="徐秋实"
学生代码项:
FINDFOR姓名="徐秋实"
4.*-------------------------------------------------------
*【程序改错】
*-------------------------------------------------------
*题目:
有学生数据库STD.DBF文件,其中学号字段的前两位是班号。
*请编写程序MODI1.PRG:
选择所有少数民族(非汉族)的学
*生参加某项活动,按民族的拼音次序升序排列,同民族的按
*照学号升序排列,并为之生成编号。
编号的前两位是班号,
*后两位是统一新编序号。
并将学号、编号、姓名、性别和
*民族添加到数据库文件BS中。
*-------------------------------------------------------
*注意:
不可以增加或删除程序行,也不可以更改程序的结构。
*-------------------------------------------------------
SETTALKOFF
SETSAFETYOFF
stor0tonum
stor""tobianhao
sele2
usestd
***********FOUND**********
indexon民族,学号tostd.idx
sele1
usebs
zap
sele2
dowhile.not.eof()
***********FOUND**********
if民族="汉"
num=num+1
***********FOUND**********
bianhao=学号+NUM
SELE1
APPEBLAN
repl学号withb->学号,编号withbianhao,姓名withb->姓名,性别withb->性别,民族withb->民族
endif
sele2
skip
enddo
CLOSEDATABASE
SETTALKON
RETURN
检查代码项:
<>
学生代码项:
if民族="汉"
------------------------------
检查代码项:
indexon民族+学号tostd.idx|indeon民族+学号tostd.idx
学生代码项:
indexon民族,学号tostd.idx
------------------------------
检查代码项:
subs(学号,1,2)+STR(NUM,1)|substr(学号,1,2)+STR(NUM,1)
学生代码项:
bianhao=学号+NUM
------------------------------
5.*-------------------------------------------------------
*【程序填空】
*-------------------------------------------------------
*功能:
下面程序是计算1+3+5+…+99之和的程序。
*请在【】处添上适当的内容,使程序完整。
*-------------------------------------------------------
SETTALKOFF
***********SPACE**********
【?
】
***********SPACE**********
FORI=1TO99【?
】
S=S+I
ENDFOR
***********SPACE**********
?
"结果=",【?
】
SETTALKON
RETURN
s=0
step2
s
6.*-------------------------------------------------------
*【程序填空】
*-------------------------------------------------------
*功能:
表RSDA.DBF结构为:
姓名(C,6);性别(C,2),年
*龄(N,2),出生日期(D,8)。
判断表中是否有"李明",
*查询此人的性别及年龄,确定参加运动会的项目。
*请在【】处添上适当的内容,使程序完整。
*-------------------------------------------------------
SETTALKOFF
USERSDA
***********SPACE**********
【?
】FOR姓名="李明"
***********SPACE**********
IF.NOT.【?
】
DOCASE
CASE性别="男"
?
"请参加爬山比赛"
CASE年龄<=50
?
"请参加投篮比赛"
CASE年龄<=60
?
"请参加老年迪斯科比赛"
***********SPACE**********
【?
】
ELSE
?
"查无此人"
BROWSE
ENDIF
USE
SETTALKON
RETURN
【代码检查程序_12LOCATEFO...】错误
标准答案:
运行状态与匹配检查
学生答案:
------------------------------
检查代码项:
LOCATE
学生代码项:
【?
】FOR姓名="李明"
------------------------------
【代码检查程序_14IF.NO...】错误
标准答案:
运行状态与匹配检查
学生答案:
------------------------------
检查代码项:
EOF()
学生代码项:
IF.NOT.【?
】
------------------------------
【代码检查程序_23...】错误
标准答案:
运行状态与匹配检查
学生答案:
------------------------------
检查代码项:
ENDCASE
学生代码项:
【?
】
------------------------------
7.设计一个名称为form2的表单。
要求:
1.表单运行时在屏幕中居中显示。
2.在表单上添加一个文本框控件,名称为text1;一个标签控件,名称为la1,显示字号14,红色,设文本框初值为0;
两个命令按钮,名称分别为comm1、comm2,Caption分别设置为"确定","退出"。
3.在文本框中输入一个整数,单击确定按钮时,在标签上显示出此整数的阶乘结果值
(用for循环,i为初值,求P阶乘,把文本框内容赋值给n,并使用fori=1ton)。
单击退出按钮时,返回到系统状态。
【文件是否存在】错误
标准答案:
form2.scx
学生答案:
文件不存在
【表单初始化时是否让表单自动地在VisualFoxPro主窗口中居中】错误
标准答案:
.T.
学生答案:
Property设置错误
【指定在代码中用以引用对象的名称】错误
标准答案:
Text1
学生答案:
Property设置错误
【指定在代码中用以引用对象的名称】错误
标准答案:
La1
学生答案:
Property设置错误
【指定对象文本的字体大小】错误
标准答案:
14
学生答案:
Property设置错误
【指定用于显示对象中文本和图形的前景色】错误
标准答案:
255,0,0
学生答案:
Property设置错误
【指定在代码中用以引用对象的名称】错误
标准答案:
Comm1
学生答案:
Property设置错误
【指定在代码中用以引用对象的名称】错误
标准答案:
Comm2
学生答案:
Property设置错误
【指定对象标题文本】错误
标准答案:
确定
学生答案:
Property设置错误
【指定对象标题文本】错误
标准答案:
退出
学生答案:
Property设置错误
【代码检查Comm1_Click】错误
标准答案:
运行状态与匹配检查
学生答案:
------------------------------
检查代码项:
for
学生代码项:
【无】
------------------------------
【属性:
Value】错误
标准答案:
0
学生答案:
Property设置错误
【代码检查Comm2_Click】错误
标准答案:
运行状态与匹配检查
学生答案:
------------------------------
检查代码项:
release
学生代码项:
【无】
------------------------------
8.1.新建数据库"学生选课"。
2.将新表xsda和xsxk添加到"学生选课"库中。
3.为xsda按学号升序,建立主索引,索引名为xh;
为xsxk按学号升序,建立普通索引,索引名为xh;
以xsda为父表,xsxk为子表建立永久性联系。
4.为xsda表"年龄"字段建立有效性规则:
年龄小于等于30。
5.对表xsxk进行如下操作:
1)添加一个字段:
学分(数值型、宽度1);
2)填写"学分"字段为表达式int(学时数/30)的值。
【文件是否存在】错误
标准答案:
学生选课.dbc
学生答案:
文件不存在
【表是否包含在数据库中】错误
标准答案:
xsda
学生答案:
Property设置错误
【表是否包含在数据库中】错误
标准答案:
xsxk
学生答案:
Property设置错误
【索引名称】错误
标准答案:
XH
学生答案:
未找到索引文件
【索引类型】错误
标准答案:
主键-主索引
学生答案:
未找到索引文件
【排序方式】错误
标准答案:
升序
学生答案:
未找到索引文件
【索引名称】错误
标准答案:
XH
学生答案:
未找到索引文件
【索引类型】错误
标准答案:
普通索引
学生答案:
未找到索引文件
【排序方式】错误
标准答案:
升序
学生答案:
未找到索引文件
【主表】错误
标准答案:
xsda
学生答案:
Property设置错误
【字段长度】错误
标准答案:
1
学生答案:
【[表中记录]】错误
标准答案:
950018|高等数学|80|2|
学生答案:
记录内容错误
第二套
1.*-------------------------------------------------------
*【程序改错】
*-------------------------------------------------------
*题目:
给一个不多于5位的正整数,要求:
一、求它是几位数,
*二、逆序打印出各位数字。
*-------------------------------------------------------
*注意:
不可以增加或删除程序行,也不可以更改程序的结构。
*-------------------------------------------------------
settalkoff
clear
x=8765
***********FOUND**********
a=int(x-10000)
b=int(x%10000/1000)
c=int(x%1000/100)
d=int(x%100/10)
e=int(x%10)
***********FOUND**********
if!
a<>0
?
"这个数是5位数",str(e,1)+str(d,1)+str(c,1)+str(b,1)+str(a,1)
else
if!
b=0
?
"这个数是4位数",str(e,1)+str(d,1)+str(c,1)+str(b,1)
else
if!
c=0
?
"这个数是3位数",str(e,1)+str(d,1)+str(c,1)
else
if!
d=0
?
"这个数是2位数",str(e,1)+str(d,1)
else
if!
e=0
?
"这个数是1位数",str(e,1)
endif
endif
endif
endif
***********FOUND**********
return
SETTALKON
return
【代码检查程序_13a=int(x/10...】错误
标准答案:
运行状态与匹配检查
学生答案:
------------------------------
检查代码项:
a=int(x/10000)
学生代码项:
a=int(x-10000)
------------------------------
【代码检查程序_19if!
a=0】错误
标准答案:
运行状态与匹配检查
学生答案:
------------------------------
检查代码项:
if!
a=0|ifa<>0|ifa
学生代码项:
if!
a<>0
------------------------------
【代码检查程序_38endif】错误
标准答案:
运行状态与匹配检查
学生答案:
------------------------------
检查代码项:
endif|endi
学生代码项:
return
------------------------------
2.*-------------------------------------------------------
*【程序改错】
*-------------------------------------------------------
*题目:
分别统计字符串中数字字符的个数。
*例如,给字符串s输入:
AAaa34BBb123CCc5cccd,
*则应输出结果:
num=6。
*-------------------------------------------------------
*注意:
不可以增加或删除程序行,也不可以更改程序的结构。
*-------------------------------------------------------
settalkoff
clear
s='AAaa34BBb123CCc5cccd'
stor0tou
fori=1tolen(s)
***********FOUND**********
ifsubs(s,i,1)<'9'.and.subs(s,i,1)>'0'
u=u+1
***********FOUND**********
loop
***********FOUND**********
enddo
?
"num=",u
SETTALKON
RETU
【代码检查程序_16ifsubs(s,i...】错误
标准答案:
运行状态与匹配检查
学生答案:
------------------------------
检查代码项:
ifsubs(s,i,1)<='9'.and.subs(s,i,1)>='0'|ifsubstr(s,i,1)<='9'.and.substr(s,i,1)>='0'
学生代码项:
ifsubs(s,i,1)<'9'.and.subs(s,i,1)>'0'
------------------------------
【代码检查程序_19endi】错误
标准答案:
运行状态与匹配检查
学生答案:
------------------------------
检查代码项:
endi|endif
学生代码项:
loop
------------------------------
【代码检查程序_21endfor】错误
标准答案:
运行状态与匹配检查
学生答案:
------------------------------
检查代码项:
endfor|endf
学生代码项:
enddo
------------------------------
3.*-------------------------------------------------------
*【程序改错】
*-------------------------------------------------------
*题目:
已有数据库dat.dbf,其中有data1--data7、最大数、最小
*数和平均数等字段。
请考生编写程序MODI1.PRG,其功能
*是按记录求出data1--data7七个数中的最大数、最小数和
*平均数,并记入数据库的相应字段中,最后把结果输出到
*data1.dbf文件中
*-------------------------------------------------------
*注意:
不可以增加或删除程序行,也不可以更改程序的结构。
*-------------------------------------------------------
SETTALKOFF
CLEAR
USEDAT
***********FOUND**********
DOWHILEFOUND()
AV_NUM=(DATA1+DATA2+DATA3+DATA4+DATA5+DATA6+DATA7)/7
MAX_NUM=MAX(DATA1,MAX(DATA2,MAX(DATA3,MAX(DATA4,MAX(DATA5,MAX(DATA6,DATA7))))))
MIN_NUM=MIN(DATA1,MIN(DATA2,MIN(DATA3,MIN(DATA4,MIN(DATA5,MIN(DATA6,DATA7))))))
***********FOUND**********
REPLALL最大数WITHMAX_NUM,最小数WITHMIN_NUM,平均数WITHAV_NUM
***********FOUND**********
cont
ENDDO
COPYTODATA1
usedata1
list
USE
SETTALKON
RETU
【代码检查程序_16DOWHILE.NO...】错误
标准答案:
运行状态与匹配检查
学生答案:
------------------------------
检查代码项:
DOWHILE.NOT.EOF()
学生代码项:
DOWHILEFOUND()
-----------------
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- VF 考试 试题