欢迎来到天天文库
浏览记录
ID:12539604
大小:47.50 KB
页数:6页
时间:2018-07-17
《高一信息技术练习题(vb)[]》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库。
1、高一信息技术练习题算法与程序设计(VB)----基本语句一、根据要求完成下列各题1、PrivateSubCommand1_Click()A=12B=15C=A+BPrint"C=";CEndSub结果为:___________________2、PrivateSubCommand1_Click()A=12B=15C=BC=C-APrint"C=";CEndSub结果为:___________________3、PrivateSubCommand1_Click()X=3Y=4Z=Sqr(Y)Y=X+ZPrint"Y=";YEndSub结果为:___________________
2、4、PrivateSubCommand1_Click()X=-3Y=9Y=Sqr(Y)Y=Abs(X)+YPrint"Y=";YEndSub结果为:___________________5、PrivateSubCommand1_Click()I=120J=110PrintI;JK=II=JJ=KPrint"I=";I,"J=";JEndSub结果为:__________________________________6、PrivateSubCommand1_Click()I=120J=110I=I+JJ=I-JI=I-JPrint"I=";I,"J=";JEndSub结果为:_
3、__________________7、PrivateSubCommand1_Click()A=Val(InputBox("请输入一个数"))IfA>=0ThenPrintAElsePrintAbs(A)EndIfEndSub单击按钮,输入-9,运行结果为:_____________8、PrivateSubCommand1_Click()A=Val(InputBox("请输入一个数"))B=Val(InputBox("请输入一个数"))IfA>=BThenY=AElseY=BEndIfPrintYEndSub单击按钮,输入100和90运行结果为:_____________9、P
4、rivateSubCommand1_Click()A=Val(InputBox("请输入一个数"))IfInt(A/2)=A/2ThenA=AElseA=A+1EndIfPrint"A=";AEndSub单击按钮,输入2运行结果为:_____________单击按钮,输入9运行结果为:_____________10、PrivateSubCommand1_Click()A=Val(InputBox("请输入一个数"))IfAMod2=0ThenLabel1.Caption="您输入的是一个偶数"ElseLabel1.Caption="您输入的是一个奇数"EndIfEndSub单击
5、按钮,输入37运行结果为:_____________________11、PrivateSubCommand1_Click()A=Val(InputBox("请输入一个数"))S=0ForI=1ToAS=S+INextIPrint"S=";SEndSub单击按钮,输入5运行结果为:__________________12、PrivateSubCommand1_Click()A=Val(InputBox("请输入一个数"))S=0ForK=1ToAStep3S=S+2NextKPrint"S=";SEndSub单击按钮,输入15运行结果为:__________________13
6、、PrivateSubCommand1_Click()A=Val(InputBox("请输入一个数"))S=0ForK=1ToAStep3S=S+2NextKS="S="+Str(S)Label1.Caption=SEndSub单击按钮,输入27运行结果为:__________________14、PrivateSubCommand1_Click()A=Val(InputBox("请输入一个数"))S=2ForK=1ToAS=S*KNextKS="S="+Str(S)Label1.Caption=SEndSub单击按钮,输入4运行结果为:__________________15
7、、PrivateSubCommand1_Click()A=Val(InputBox("请输入一个数"))S=1ForK=1ToAStep5S=S*2NextKS="S="+Str(S)Label1.Caption=SEndSub单击按钮,输入25运行结果为:__________________16、写出下列语句的基本格式(1)、赋值语句:__________________实例:__________________(2)、输入语句:__________________实例:_________
此文档下载收益归作者所有