vfp下练习二.docx
- 文档编号:24295038
- 上传时间:2023-05-26
- 格式:DOCX
- 页数:23
- 大小:125.02KB
vfp下练习二.docx
《vfp下练习二.docx》由会员分享,可在线阅读,更多相关《vfp下练习二.docx(23页珍藏版)》请在冰豆网上搜索。
vfp下练习二
1、学生.DBF
结构:
学号姓名性别出生年月简历奖学金照片
C,6C,8L,1D,8M,4N,6,2G,4
记录:
记录号#学号姓名性别出生年月简历奖学金照片
1951001王平.F.05/06/70memo50.00gen
2951003李华.F.01/23/71memo25.00gen
3954006张小强.T.07/21/70memo0.00gen
4953008赵峰.T.11/05/72memo75.00gen
5954011丁超.T.09/27/70memo0.00gen
6953013罗浩.T.09/09/71memo50.00gen
3、成绩.DBF
结构:
学号课程号成绩
C,6C,4N,5,1
记录:
记录号#学号课程号成绩
1951001000195.0
2951003000388.0
3954006000178.0
4953008000490.0
5951001000378.0
6951003000480.0
(注:
性别=.F.为女,性别=.T.为男,学号前三位为班级号)
2、
课程.DBF
结构:
课程号课程名学时数
C,4C,20N,3
记录:
记录号#课程号课程名学时数
10001高等数学108
20002英语90
30003计算机基础68
40004数据库应用80
50005工程制图80
试题1、
说明:
阅读下列程序(段)并回答问题,在每小题提供的若干可选答案中,挑选一个正确答案。
【程序】
【回答下列问题】
(1)按照奖学金建立索引之后,第1次输出的结果为:
:
A、1.T.B、3.T.C、1.F.D、3.F.
(2)按照奖学金建立索引之后,第2次输出的结果为:
:
A、3.T.B、1.T.C、3.F.D、1.F.
(3)按照奖学金建立索引之后,第3次输出的结果为:
:
A、4.T.B、6.T.C、4.F.D、6.F.
(4)按照奖学金建立索引之后,第4次输出的结果为:
:
A、5.T.B、7.T.C、5.F.D、7.F.
USE学生
INDEXON奖学金TOJXJ
LIST
GOTTOP
?
RECNO(),BOF()
SKIP-1
?
RECNO(),BOF()
GOBOTTOM
?
RECNO(),EOF()
SKIP
?
RECNO(),EOF()
试题2、(每空格3分,共12分)(08春)
阅读下列程序说明和程序,在每小题提供的若干可选答案中,挑选一个正确答案。
【程序说明】
输入学生学号,显示该学生的学号和已通过课程的总学时数。
【程序】
SETTALKOFF
CLEAR
SELE1
USE成绩
【供选择的答案】
(5)A、INDEXON课程号TOINX
B、INDEXONINXTO课程号
C、INDEXONINXTO课程号OFIXS
D、INDEXON学号TOINX
(6)A、SEEK学号
B、SETFOR学号=ALLT(XH)
C、LOCATEFOR学号=ALLT(XH)
D、SEEKALLT(XH)
(7)A、SEEKB.课程号
B、SEEKA.课程号
C、SEEK课程号
D、SEEK1.课程号
(8)A、GORECNO()B、SKIP
C、SKIP-1D、CONT
SELE2
USE课程
(5)
KSS=0
ACCEPT'输入学生学号='TOXH
SELE成绩
(6)
DOWHIL!
EOF()
IF成绩>=60
SELE课程
(7)
KSS=KSS+学时数
ENDIF
SELE成绩
(8)
ENDDO
?
XH,KSS
CLOSEALL
SETTALKON
试题3、(每空格3分,共12分)(07秋)
阅读下列程序说明和程序,在每小题提供的若干可选答案中,挑选一个正确答案。
【程序说明】
输入学生学号,显示该学生的姓名、课程号以及成绩。
【供选择的答案】
(9)A、INDEXON学号TOIXS
B、INDEXON学号INTO学生
C、INDEXON学生TO学号OFIXS
D、INDEXON学生TO学号
(10)A、SETRELATO学号INTOA
B、SETRELATO学号INTOB
C、SETRELATOAINTO学号
D、SETRELATO学生INTO学号
(11)A、?
姓名,B.课程号,B.成绩
B、?
A.姓名,课程号,成绩
C、?
1.姓名,2.课程号,2.成绩
D、?
1.姓名,课程号,成绩
(12)A、GOFOR学号=ALLT(XH)B、SKIP
C、SKIP-1D、CONT
【程序】
SETTALKOFF
CLEAR
SELE1
USE学生
(9)
SELE2
USE成绩
(10)
ACCEPT'输入学生学号='TOXH
LOCAFOR学号=ALLT(XH)
DOWHIL!
EOF()
(11)
(12)
ENDDO
USE
SETTALKON
试题4、(每空格3分,共12分)(07春)
说明:
阅读下列程序(段)并回答问题,在每小题提供的若干可选答案中,挑选一个正确答案。
【程序】
【供选择的答案】
(13)第一个显示?
a.学号的值为(21)。
A、951001B、954006C、951003D、953008
(14)第二个显示?
b.成绩的值为(22)。
A、95.0B、88.0C、78.0D、90.0
(15)第三个显示?
a.学号的值为(23)。
A、954006B、951003C、951001D、953008
(16)第四个显示?
b.成绩的值为(24)。
A、95.0B、88.0C、90.0D、78.0
Settalkoff
Sele1
Use学生
Sele2
Use成绩
SeleA
Skip
?
a.学号&&第一个显示
?
b.成绩&&第二个显示
SeleB
INDEXON学号TOX1
SELEA
SETRELATO学号INTOB
Go3
?
a.学号&&第三个显示
?
b.成绩&&第四个显示
Closeall
Settalkon
试题5、(每空格3分,共12分)(09春)
阅读下列程序说明和程序,在每小题提供的若干可选答案中,挑选一个正确答案。
【程序说明】
统计输出所有男生和女生的平均成绩。
【程序】
【供选择的答案】
(17)A.SELE3
B.SELE学生
C.SELEB
D.SELE1
(18)A.IFXB
B.IFFOUND()
C.IFXB=T
D.IF!
FOUND
(19)A.GOBOTT
B.SKIP
C.SKIP-1
D.CONTINUE
(20)A.?
SKIP-1
B.SKIP
C.?
CONTINUE
D.GOTOP
SETTALKOFF
CLEAR
SELE1
USE学生
SELE2
USE成绩
SELEA
STORE0TOX1,X2,X3,X4
DOWHILE!
EOF()
XH=学号
XB=性别
(17)
LOCAFOR学号=ALLT(XH)
DOWHILE!
EOF()
(18)
X1=X1+成绩
X2=X2+1
ELSE
X3=X3+成绩
X4=X4+1
ENDIF
(19)
ENDDO
SELEA
(20)
ENDDO
?
’男生平均成绩=’,X1/X2
?
’女生平均成绩=’,X3/X4
CLOSEALL
SETTALKON
试题6、(每空格3分,共12分)(06秋)
说明:
阅读下列程序(段)并回答问题,在每小题提供的若干可选答案中,挑选一个正确答案。
【程序】
SETTALKOFF
SELE1
USE成绩
INDEXON课程号TOX1
SELE2
USE课程
SETRELATO课程号INTOA
INPUT"输入课程名="TOK
LOCATEFOR课程名=ALLT(K)
【供选择的答案】
(21)当K输入为“英语”,第一个显示?
A.成绩的值为(21)。
A、78.0B、88.0C、95.0D、没有显示
(22)当K输入为“英语”,第二个显示?
RECNO()的值为(22)。
A、1B、2C、3D、7
(23)当K输入为“工程制图”,第一个显示?
A.成绩的值为(23)。
A、0.0B、78.0C、80.0D、90.0
(24)当K输入为“工程制图”,第二个显示?
RECNO()的值为(24)。
A、4B、5C、6D、7
IF.NOT.EOF()
IF学时数>=90
SKIP
ELSE
SKIP-1
ENDIF
ENDIF
?
A.成绩
?
RECNO()
USE
SETTALKON
试题7、(每空格3分,共12分)(08秋)
阅读下列程序说明和程序,在每小题提供的若干可选答案中,挑选一个正确答案。
【程序说明】
输入学生学号,求该学生的平均成绩,并显示该学生学号、姓名和平均成绩。
【程序】
SETTALKOFF
CLEAR
(25)
USE学生
SELE2
USE成绩
SELEA
CJ=0
MS=0
【供选择的答案】
(25)A.SELE5
B.SELE学生
C.SELE0
D.SELE2
(26)A.IFEOF()
B.IFFOUND()
C.IFEOF=.F.
D.IFFOUND()=T
(27)A.DOWHILEOF()
B.SCANFOR!
EOF()
C.SCAN
D.DOWHIL!
EOF()
(28)A.?
XH,学生.姓名,CJ
B.?
XH,学生.姓名,CJ/MS
C.?
XH,学生.姓名,MS/CJ
D.?
XH,姓名,CJ/MS
ACCEPT‘输入学生学号=’TOXH
LOCAFOR学号=ALLT(XH)
(26)
SELE成绩
(27)
IF学号=ALLT(XH)
CJ=CJ+成绩
MS=MS+1
ENDIF
SKIP
ENDDO
(28)
ELSE
?
’找不到该学号学生’
ENDIF
CLOSEALL
SETTALKON
试题8、(每空格3分,共12分)(09春)
说明:
阅读下列程序(段)并回答问题,在每小题提供的若干可选答案中,挑选一个正确答案。
【程序】
【供选择的答案】
(29)当输入学号为953008时,输出值S1为(21)。
A、0B、1C、2D、3
(30)当输入学号为953008时,输出值S2为(22)。
A、90B、88C、95D、78
(31)当输入为951时,输出值S1为(23)。
A、1B、5C、4D、3
(32)当输入为951时,输出值S2为(24)。
A、194B、95C、289D、341
SETTALKOFF
CLEA
Use成绩
STORE0TOS1,S2
ACCEPT‘输入学号=’TOA
A=ALLT(A)
LOCAFOR学号=A
DOWHILE!
EOF()
S1=S1+1
S2=S2+成绩
CONTINUE
ENDDO
?
”S1=”,S1,”S2=”,S2
USE
SETTALKON
试题9、(每空格3分,共12分)(09春)
阅读下列程序说明和程序,在每小题提供的若干可选答案中,挑选一个正确答案。
【程序说明】
下面表单完成上翻、下翻查询功能,数据以只读方式显示。
【程序】
表单FORM1的INIT事件代码:
THIS.COMMANDGROUP1.COMMAND1.CAPTION=’上翻’
THIS.COMMANDGROUP1.COMMAND2.CAPTION=’下翻’
(33)
THIS.CHK性别.ENABLED=.F.
【供选择的答案】
(33)A.THIS.SETALL(‘READONLY’,.F.,’TEXTBOX’)
B.THIS.SETALL(‘READONLY’,T,’TEXTBOX’)
C.THIS.SETALL(TEXT,READONLY,.T.)
D.THIS.SETALL(‘READONLY’,.T.,’TEXTBOX’)
(34)A.COMMAND1B.COMMANDGROUP1
C.COMMAND2D.COMMANDGROUP
(35)A.CASETHIS.VALUE=2
B.CASETHISFORM.VALUE=2
C.CASECOMMAND1.VALUE=2
D.CASETHIS.COMMAND=2
(36)A.RELEASETHISFORM
B.THIS.RELEASE
C.THISFORM.REFRESH
D.THISFORM.RELEASE
THIS.EDT简历.READONLY=.T.
(34)的CLICK事件代码:
DOCASE
CASETHISFORM.COMMANDGROUP1.VALUE=1
SKIP-1
IFBOF()
THIS.COMMAND1.ENABLED=.F.
ENDIF
THIS.COMMAND2.ENABLED=.T.
(35)
SKIP
IFEOF()
THIS.COMMAND2.ENABLED=.F.
ENDIF
THIS.COMMAND2.ENABLED=.T.
ENDCASE
(36)
试题10、面向对象程序设计(28分)08秋
编制查询学生获奖学金情况的表单,表单控件的布局界面如图1所示。
具体要求:
1)在form1的init中设置初值,并且,组合框(Combo1)与“姓名”字段要求采用绑定实现,其它字段采用非绑定方法来实现,初始运行界面,如图2所示;
2)选择组合框(Combo1)中某个姓名(如“王平”)后,显示该学生的各项信息,如图3所示。
注意:
“性别”和“出生年月”字段显示时的格式。
图1初始布局界面图2运行初始界面
图3选择姓名后的界面
试题11、面向对象程序设计(28分)08春
编制查询学生获奖学金情况的表单,表单控件的布局界面如图1所示。
具体要求:
1)在form1的init中设置初值,并把焦点指向TEXT1,如图2所示;
2)在TEXT1中输入学号,按查询(command1)按钮,则显示该学生姓名以及各门课程的成绩,如图3所示;
3)如果找不到该学生学号,则显示窗口,如图4所示;
4)按退出(command3)按钮时,则退出表单。
图1表单控件的布局界面图2表单运行初始界面
图3找到该学号时界面图4找不到该学号时界面
试题12、单元代码填空(每空格1分,共12分)
(1)编制一个查询某课程总评均成绩的表单,已经将“课程”表和“成绩”表加入数据环境。
表单涉及界面如图1,初始运行界面如图2。
组合框combo1中数据和“课程名”绑定。
(2)当用户在组合框中选择某课程后,鼠标单击“显示”按钮(command1),表单自动统计该课程的总平均成绩,并在文本框text1中显示,如图3。
图1表单设计界面图2初始运行界面图3表单显示界面
【要求】按右侧的功能要求完成表单如下事件代码。
表单FORM1的INIT事件代码:
(1)&&设置表单的标题
(2)&&设置课程名标签的标题
(3)&&设置平均成绩标签的标题
(4)&&设置显示按钮的标题
(5)&&设置组合框数据源类型
(6)&&设置组合框数据源
(7)&&将光标定位到组合框
显示按钮command1的Click事件代码:
(8)&&将当前工作区转为“课程”
(9)&&将所选课程的课程号存入变量KCH
(10)&&将当前工作区转为“成绩”
(11)&&根据KCH统计该课程的平均成绩
(12)&&在文本框中显示平均成绩
参考答案
1.D
2.A
3.C
4.B
5.A
6.C
7.B
8.D
9.A
10.A
11.B
12.D
13.C
14.A
15.A
16.D
17.C
18.A
19.D
20.B
21.B
22.C
23.D
24.A
25.C
26.B
27.D
28.B
29.B
30.A
31.C
32.D
33.D
34.B
35.A
36.C
试题10:
(1)form1的init事件
THISFORM.LABEL1.CAPTION="选择学生姓名"
THISFORM.LABEL2.CAPTION="学号"
THISFORM.LABEL3.CAPTION="姓名"
THISFORM.LABEL4.CAPTION="性别"
THISFORM.LABEL5.CAPTION="出生年月"
THISFORM.LABEL6.CAPTION="奖学金"
THISFORM.LABEL7.CAPTION="简历"
THISFORM.COMBO1.ROWSOURCETYPE=2
THISFORM.COMBO1.ROWSOURCE='学生.姓名'
THISFORM.TEXT4.DATEFORMAT=14
方法2:
IF性别
THISFORM.TEXT3.VALUE='男'
ELSE
THISFORM.TEXT3.VALUE='女'
ENDIF
&&设置初始状态
THISFORM.SETALL('VALUE',"")
(2)combo1的interactivechange事件
THISFORM.TEXT1.VALUE=学号
方法2:
Y=STR(YEAR(出生年月),4)
M=STR(MONTH(出生年月),2)
D=STR(date(出生年月),2)
THISFORM.TEXT4.VALUE=Y+'年'+M+'月'+D+'日'
THISFORM.TEXT2.VALUE=姓名
THISFORM.TEXT3.VALUE=IIF(性别,'男','女')
THISFORM.TEXT4.VALUE=出生年月
THISFORM.TEXT5.VALUE=奖学金
THISFORM.EDIT1.VALUE=简历
试题11:
Form1的init事件
THISFORM.TEXT2.READONLY=.T.
THISFORM.COMMAND1.DEFAULT=.T.
THISFORM.COMMAND1.CAPTION='显示'
THISFORM.COMMAND2.CAPTION='退出'
THISFORM.LABEL1.CAPTION='学号:
'
THISFORM.LABEL2.CAPTION='姓名:
'
SELECT成绩
INDEXON学号TOxh
SELECT学生
SETRELATIONTO学号INTO成绩
LOCATEFOR学号==""
THISFORM.GRID1.RECORDSOURCETYPE=1
THISFORM.GRID1.RECORDSOURCE="成绩"
Command1的click事件
SELECT学生
LOCATEFOR学号=ALLT(THISFORM.TEXT1.VALUE)
IFFOUND()
THISFORM.TEXT2.VALUE=姓名
ELSE
THISFORM.TEXT2.VALUE=""
MESSAGEBOX("查无此人!
")
ENDIF
Command2的click事件
THISFORM.RELEASE
试题12:
(1)THIS.CAPTION=’查询并显示指定课程总平均成绩’
(2)THIS.LABEL1.CAPTION=’请选择课程名’
(3)THIS.LABEL1.CAPTION=’总平均成绩’
(4)THIS.COMMAND1.CAPTION=’显示’
(5)THIS.COMBO1.ROWSOURCETYPE=2
(6)THIS.COMBO1.ROWSOURCE='课程.课程名'
(7)THIS.COMBO1.SETFOCUS
(8)SELECT课程
(9)KCH=课程号
(10)SELECT成绩
(11)AVERAGE成绩TOZPJCJFORALLTRIM(课程号)=KCH
(12)THISFORM.TEXT1.VALUE=ZPJCJ
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- vfp 练习