浙江省东阳中学2018_2019学年高一技术下学期期中试题

《浙江省东阳中学2018_2019学年高一技术下学期期中试题》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、浙江省东阳中学2018-2019学年高一技术下学期期中试题（说明：本试题卷包括信息技术与通用技术两部分，满分70分，考试时间60分钟。）第一部分信息技术一、选择题（本大题共10小题，每小题2分，共20分，每小题列出的四个备选项中只有一个是符合题目要求的，不选、错选、多选均不得分。）（）1.下列数值中，与十六进制数30最接近的是A.29DB.31DC.110010BD.2FH（）2.算式10D-100B计算结果是A.-90DB.10BC.4DD.110B（）3.使用UltraEdit软件观察某段字符的内码，部分界面如图所示下列说法正确的是A．该段字符至少包含4个汉字B．字符“中”的内码为“

2、B9FA”C．字符“V”的二进制编码为1010110D．字符“j”的内码为70H（）4.某Flash作品的部分编辑界面如下图所示：完整播放该场景一次需要5秒，如果要让播放时间延长到10秒，可以将帧频设置为A．3.0fpsB．6.0fpsC．12.0fpsD．24.0fps（）5．小明在制作Flash作品时，舞台及库中素材如右图所示，把“马”元件插入到“马”图层第1帧并放在舞台的草地位置，发现舞台中并无马图像显示，下列情形中最有可能的是A.“马”图层已被锁定B.“马”图层已被隐藏C.“马”图层以轮廓显示D.马图形被背景图层的内容挡住了（）6.VB表达式2*8Mod12+4的值是  A．8 

3、B．22C．20  D．0（）7．数学表达式"2n-1＞0且2n-1≠1"对应的VisualBasic表达式是A．2·n-1>0And2·n-1<>1B．2*n>1AndNot(2*n-1=1)C．2n-1>0And2n-1≠1D．2*n-1>0And2n-1<>1（）8．某VB程序的一个事件过程如下：PrivateSubCommand1_Click()DimaAsIntegera=Val(Text1.Text)Text1.Text=Str(Sqr(a))EndSub程序运行时单击命令按钮Command1后弹出如图所示错误信息提示。出现错误原因是A．Sqr函数计算时出现错误B．Str函数

4、计算时出现错误C．界面上缺少文本框Text1D．变量a类型定义错误（）9.在VB窗体中有一个对象的属性窗口如第9题图所示，下列说法中不正确的是A．1680为属性值B．该对象的名称为Timer1C．根据“Timer1Timer”可判断窗体名为TimerD．Interval为属性名第9题图第10题图（）10.某算法的流程图如第10题图所示，执行该算法后，输出的结果是A．50B．20C．210D．5二、非选择题（本大题共4小题，其中第11小题2分，第12小题3分，第13小题4分，第14小题6分，共15分）11.程序修改题，①②③④处有1处错误，错误在第处，改为。下列程序的功能是在标签Label

5、1中显示1+2+3+…+10值。DimsAsIntegerDimiAsInteger①s=0②Fori=1To10③s=iNexti④Label1.Caption=Str(s)12.有如下VisualBasic程序：PrivateSubCommand1_Click()DimsAsInteger,IAsIntegers=0Fori=1To10s=s+i7NextiText1.text=str(s)Endsub该程序段运行后，i的值为,文本框Text1中显示。13.从字符串中找出所有大写字母，并把找出的大写字母显示在Text2中。请完善程序。DimxAsString,yAsString,i

6、AsIntegerDimnAsInteger,pdAsBoolean①y=""Fori=1To②pd=Asc(Mid(x,i,1))Ifpd<91Andpd>64Then'大写字母的ASCII值为[65,90]③EndIfNextiText2.Text=y14.素数只能被1和它本身整除，不能被其他自然数整除。编写VB程序实现如下功能：单击“产生奇数并判断”按钮Command1，随机产生一个三位正奇数显示在文本框Text1中，并在文本框Text2中显示其是否为素数的判断结果。例如，当随机产生的三位正奇数为953时，程序运行界面如第14题图a所示。第14题图a②①③④第14题图b(1)在设计

7、程序界面时，应使用第14题图b所示“控件工具箱”中的(填写相应编号)添加文本框Text1。(2)实现上述功能的VB程序如下，请在划线处填写合适的代码。PrivateSubCommand1_Click()DimnAsInteger,iAsIntegerDimflagAsBoolean‘用于标记是否为素数Randomizen=Int(①)*2-1Text1.Text=Str(n)flag=True‘标记为素数i=3DoWhilei<=n