江苏高中信息技术学业水平测试操作题带答案

《江苏高中信息技术学业水平测试操作题带答案》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、徐州经济技术开发区高级中学信息组祝您考试成功！Vb专项练习第一套题目1、打开“考生文件夹96工程1.vbp”，完善程序并保存。实现功能：假设有一个5位数密码。只记得密码为67□□8，其中百位和十位的数字记不清了，但知道该密码能够被78整除，也能被67整除。请完善算法帮忙找出这个密码。①67008②x③Nextx''请不要更改源程序的结构，删除原题里的①、②、③。填写正确的代码，使程序完善PrivateSubCommand1_Click()DimxAsLongForx=①To67998Step10I

2、f(xMod67=0)And(xMod78=0)ThenPrint②EndIf③EndSub2、“考生文件夹51工程1.vbp”是采用“穷举法”求出所有水仙花数的程序，请完善程序并保存。说明：若一个三位数abc，满足：abc=a3+b3+c3，则称abc为水仙花数。如三位数153满足：13+53+33=1+125+27=153，则153是水仙花数。'请不要更改源程序的结构，删除原题里的①、②、③。填写正确的代码，使程序完善①999②imod10③endifPrivateSubCommand1_Cl

3、ick()Dimi,a,bAsIntegerFori=100To①a=i100b=(i-a*100)10c=②Ifa*a*a+b*b*b+c*c*c=iThenPrintCStr(i)③NextiEndSub3、打开“考生文件夹12工程1.vbp”，完善程序并保存。实现功能：在Text1中输入一个代表秒数的整数后，单击“计算”按钮后，在Label1、Label2、Label3中显示对应的小时、分钟和秒数。如在Text1中输入“3672”，Label1、Label2、Label3中分别显示“1”

4、、“1”、“12”，即1小时1分12秒。'请不要更改源程序的结构，删除原题里的①、②、③。填写正确的代码，使程序完善①text1.text②ss3600③60PrivateSubCommand1_Click()Dimh,m,s,ssAsIntegerss=Val(①)h=②m=(ss-h*3600)60s=(ss-h*3600)Mod③Label1.Caption=CStr(h)Label2.Caption=CStr(m)Label3.Caption=CStr(s)EndSub4、打开“考生文件夹

5、50工程1.vbp”，完善程序并保存。实现功能：在文本框text1、text2、text3中输入3根小木棒的长度(第37页共37页徐州经济技术开发区高级中学信息组祝您考试成功！假设都是整数)，判断能否用它们搭成一个三角形，并把结果输出到文本框text4中。操作要求：（1）在窗体中加载“CommandButton”控件，命名为“Command1”并设置该控件“Caption”属性值为“判断”；（2）完善程序，执行command1_click事件，判断出结果，如果能搭成三角形则在文本框text4中输出

6、“OK”，否则输出“NO”。'请不要更改源程序的结构，删除原题里的①、②。填写正确的代码，使程序完善①integer②endifPrivateSubCommand1_Click()Dima,b,cAs①Leta=Val(Text1.Text)Letb=Val(Text2.Text)Letc=Val(Text3.Text)If(a+b>c)And(a+c>b)And(b+c>a)ThenLetText4.Text="OK"ElseLetText4.Text="NO"②EndSub5、打开“考生文件夹4

7、0工程1.vbp”，完善程序并保存。实现功能：将一张100元面值的人民币换成若干5元、1元、5角面值的人民币，但要求100元换成的零钱共100张，且要求每种面值不少于1张，问5元、1元、5角各多少张，请输出每种可能的组合。'请不要更改源程序的结构，删除原题里的①、②、③。填写正确的代码，使程序完善PrivateSubCommand1_Click()DimWuyuanAsInteger①100②yiyuan③endifDimYiyuanAsIntegerDimWujiaoAsIntegerForWuy

8、uan=1To20ForYiyuan=1To①Wujiao=100-Wuyuan-②IfWuyuan*5+Yiyuan*1+Wujiao*0.5=100ThenPrint"Wuyuan="&Wuyuan&",Yiyuan="&Yiyuan&",Wujiao="&Wujiao③NextYiyuanNextWuyuanEndSubVb专项练习第二套1、打开“考生文件夹716”文件夹中的文件：“工程1.vbp”进行以下操作后并保存。某同学欲设计一个“水电费管