- 1、本文档共14页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
计算机二级VFP上机模拟考试题
(调试程序可到10.5.10.85的“电脑学园”中下载)
第一套:
试题一 属性设置及程序改错题
gc245.scx的功能是:设计一个窗口,日历牌每10秒显示一次,每次显示10秒;系统时间的数字式表每秒显示一次新的时间。要求:
①设置计时器Timer1 和Timer2的属性
②在编写的二个过程代码Timer1_Timer(),Timer2_Timer()中各有一个错误,请调试改正。
调试改正中,每个过程代码只能改一处,并不得增删语句
Timer1的timer过程代码如下:
if thisform.label1.visible=.t.
thisform.label1.visible=.f.
else
thisform.label1.visible=.f.
endif Timer2的timer过程代码如下:
if thisform.label1.caption!=time( )
thisform.label2.caption=time
endif 试题二 程序填空题
tk245.scx的功能是:当按下“求和”按钮时,计算S=1**2+(1**2+2**2)+(1**2+2**2+3**2)+…(1**2+2**2+3**2+…+10**2)。请在该程序空白(1)、(2)处,将其补充完整,以便得到正确答案,但不得增删原语句。
“求和”按钮的click事件代码如下:
SET TALK OFF
TOT=0
FOR N=1 TO 10
T=0
M=1
DO WHILE M=N
T=t+(1)
M=M+1
ENDDO
TOT=TOT+T
ENDFOR
? S=,(2)
SET TALK ON
RETURN
第二套:
试题一 属性设置及改错题:
gc291.scx的功能是:设计一个窗口,输入一个整数,按下判断按钮,若该整数是一负数,则显示该数不是一个素数,若为素数,则显示该数是一个素数,否则也显示该数不是一个素数。要求:
(1) 设置label2和label3的属性,使其开始运行时不可见。
(2) 在command1_click() 的过程代码中有两处错误,请调试改正。
Command1的click过程代码如下:
thisform.label2.visible=.f.
thisform.label3.visible=.f.
n=thisform.text1.value
if n0
thisform.label3.visible=.t.
endif
for i=2 to sqrt(n)
if mod(n,i)=0
loop
endif
endfor
if i=sqrt(n)
thisform.label2.visible=.t.
else
thisform.label3.visible=.t.
endif 试题二 程序填空题
设表文件WK.DBF的编号字段名为BH,类型为数值型,宽度为3,程序TK291.scx的功能是,单击处理按钮实现:把BH每一位相加是奇数的记录存放到WK1.DBF文件中,并要求按照BH从大到小排序。
请在该程序空白(1)、(2)处,将其补充完整,以便得到正确答案,但不得增删原语句。
“处理”按钮的click事件代码如下:
USE WK
SORT TO WK1 ON BH/D
USE WK1
DO WHILE .NOT. EOF( )
N1=INT(BH/100)
N2=INT((BH-100*N1)/10)
N3=MOD(BH,10)
IF MOD(( 1 ),2)=0
DELETE
ENDIF
( 2 )
ENDDO
PACK
LIST
第三套:
试题一 属性设置及改错题:
已知表文件stud.dbf,包括学号(c,6),姓名(c,8),性别(c,1),系科(c,12),当前表中无记录。 gc292.scx的功能是:实现对表stud.dbf的记录输入。其中:
“追加”按钮:单击追加一条新记录;
“上一条”按钮:单击显示上一条记录;
“下一条”按钮:单击显示下一条记录;
“退出”按钮:单击录入窗口。
要求:
(1) 设置Combo1的属性,使得性别中只能输入“M”和“F”;
(2) 在command2_click()和 command3_click()的过程代码中有各有一处错误,请调试改正。
Command2的click过程代码如下:
if bof( )
go top
else
s
文档评论(0)