2017届浙江技术选考第二轮复习VB算法加试题复习20

浙江省高中信息技术选考加试题VB专项练习题二一、选择题：本大题13小题，第小题2分，共26分。

在每小题给出的四个选项中，只有一个是符合题目要求的。

1.在VB中，用变量p存储货物编码（如"0188901190"，其中每二位数字都代表相应的含义），则合适的数据类型应定义为：（A）Single （B）Long （C）String （D）Boolean2.下列VB表达式中计算结果为4的是：（A）len(“a1234”)（B）Sqr(4)（C）Fix(3.6)（D）Abs(Int(4.2))3.编写小型VB程序时，下面选项可省的是：①布局界面②编写事件处理代码③通过属性窗口设置控件属性④在事件处理过程中必须加入设置控件属性的代码⑤调试、运行程序⑥给每行程序代码增加程序注释（A）②③④（B）①④⑤（C）②⑤⑥（D）④⑥4.将数学表达式sin30o+3x2写成VB表达式，正确的是：（A）Sin(30)+3x2（B）Sin30+3x2（C）sin(30*3.1416/180)+3*x^2（D）Sin（30o）+3*x^25.下列可作为VB变量名的是：（A）const（B）not（C）edu93（D）Zj2011#6.某VB程序代码如下：Private Sub Command1_Click()Dim s(5) As Integers(0) = 10For i = 1 To 5s(i) = s(i - 1) Mod 3Next iPrint s(1)Print s(5)End Sub则程序运行后的输出结果是：（A）1 5（B）0 2（C）0 7（D）1 17.如果a=5，b=4，执行“if a>b then x=5 else y=4”后，变量x和y的值改变的是：（A）x和y都发生改变（B）x改变，y不变（C）x不变，y改变（D）x和y都没改变8.VB表达式int(rnd(-5))+val("0580")的值是：（A）580（B）-50580（C）575（D）05809.某VB程序代码如下：Private Sub Command1_Click()Text1.Text = Text2.TextEnd SubPrivate Sub Text1_KeyPress(KeyAscii As Integer)If KeyAscii = 13 ThenText2.Text = Text1.TextEnd IfEnd Sub如果在文本框text1和text2中分别输入6和12，然后单击命令按钮Command1，则文本框text1和text2分别显示的内容是：（A）6 6（B）12 12（C）12 6（D）6 1210.标签控件Label的常用属性是：（A）text（B）caption（C）form（D）name11.有如下VB程序段Private Sub Command1_Click()For i = 1 To 3 step 2x = Mid("330903", 1, 2)Next iPrint xEnd Sub该程序执行后，窗体上显示的值是：（A）33（B）09（C）03（D）9012.小王同学在调试VB程序时，会出现下图错误提示信息的是：（A）Function sina(n) As Integer .......End Function （B）Private Sub abc(a, b) as double .......End Sub（C）Private Sub Command1_click() .......End Sub （D）Private Sub Command1_click() Private Sub Command1_click() .......End Sub13.求二个数的最大公约数和最小公倍数的VB程序如下：Private Sub command1_click()m = Val(Text1.Text)n = Val(Text2.Text)a = mb = nDor = Abs(m - n)m = nn = rLoop While m <> nPrint rPrint a * b / rEnd Sub该程序运行后，如果在文本框text1中输入5，在文本框text2中输入22，则输出结果是：（A）5 22 （B）5 22 （C）22 22 （D）1 110二、综合题：本大题5小题，其中第14题2分，第15题4分，第17题4分，第18题5分，共19分。

绝密★考试结束前2017年4月浙江省普通高校招生选考科目考试信息技术试题姓名：准考证号：一、选择题（本大题共12小题，每小题2分，共24分。

每小题列出的四个备选项中只有一个是符合题目要求的，不选、多选、错选均不得分）1．关于信息安全与网络道德，下列做法正确的是A．确认环境安全后输入支付密码B．随意扫描网页中的二维码C．未经许可，将他人的私人生活视频上传到网上D．在论坛里转发会造成社会不良影响的信息2．下列有关浏览器与网页的说法，正确的是A．通过超链接可实现网页之间的跳转B．通过搜索引擎检索到的信息，排在前面的可信度必定较高C．在IE浏览器中清空历史记录，收藏夹中的网址被同时清空D．IE浏览器中以“仅HTML”格式另存网页，网页中的图片同时被保存3．使用Word软件编辑某文档，部分界面如图所示。

下列说法正确的是A．批注的对象是“地处西湖边”B．删除批注，文字“太子湾”同时被删除C．修订前，第三行文字是“地处西湖边太子湾公园，郁金香争奇斗艳。

”D．接受所有修订后，第三行文字是“太子湾公园中郁金香花争奇斗艳。

”4．使用UltraEdit软件观察字符“挑战AlphaGo！”的内码，部分界面如图所示。

下列说法正确的是A．字符“！”的内码占两个字节B．字符“战”的十六进制码是“BD 41”C．字符“h”的二进制码是“01101000”D．字符“go”的十六进制码是“47 6F”5．关于Access数据表的操作，下列说法正确的是A．重命名数据表，数据表名不能与表中的字段名相同B．删除字段，数据表中该字段的值随之被删除C．删除记录，剩余记录中数据类型为自动编号的字段值会自动更新D．Access数据表不能导出到Excel电子表格6．某算法的部分流程图如图所示。

执行这部分流程，依次输入3，4，-1，则输出s的值是A．-2B．-1 C．0D．17．某动画“起源”场景的制作脚本如表所示。

场景：起源类别序号：3进入方式：单击“目录”场景的“起源”按钮进入呈现方式：1.“太阳”从舞台右下方移到舞台中上方，再移动到舞台左下方。

浙江省高中信息技术选考加试题VB专项练习题十一一、选择题：本大题13小题，第小题2分，共26分。

在每小题给出的四个选项中，只有一个是符合题目要求的。

1.下列VB语句或函数表达式的数值小于-4的是：（A）Int(-5.6) （B）Abs(-3.6) （C）Cos(-3.6) （D）Len("-3.6")2.要存储如下形式的16个数据，合适的数组定义语句是：1 0 0 00 1 0 00 0 1 00 0 0 1（A）Dim s(16) as integer （B）Dim s(1 to 16) as integer（C）Dim s(1 to 4,1 to 4) as integer （D）Dim s(1 to 16,1 to 16) as integer3.下列可作为VB变量名的是：（A）text（B）Zhoushan! （C）1_dim （D）Caption_14.数学表达式log5写成VB表达式是：（A）log(5) （B）log5 （C）log(5)/log(10) （D）ln(5)5.在VB中定义变量s用于存放学生家庭地址，则正确的定义语句是：（A）Dim s as integer （B）Dim s as string（C）Dim s as single （D）Dim no as boolean6.已知s的逻辑值为false，m的逻辑值为true。

以下VB表达式的结果为false的是：（A）s and m （B）not s and m （C）s or m （D）not s or not m7.某VB程序代码如下：Private Sub Command1_Click()a = 30For i = 1 To 10 Step 2s = s + i \ 3Next iPrint sEnd Sub则程序运行后的a的值分别是：（A）4 （B）7 （C）10 （D）148.为了搜索出1000以内的所有素数，我们可以采用的算法是：（A）枚举算法（B）二分查找（C）解析算法（D）选择搜索9.下列能实现求两个数X和Y中较大数（用变量max保存较大数）的程序段个数是：①if x>=y then max=x else max=y②max=xIf y>max then max=y③if x<y thenT=x: x=y: y=tEnd ifmax=x④if x>=y then max=y else max=x（A）1 （B）2 （C）3 （D）410.在VB中用变量C表示计数器，则计数器的表达式是：（A）C=0 （B）C=1 （C）C+1=C （D）C=C+111.下列控件都有的属性是：（A）name （B）caption （C）text （D）click12.某数组有7个元素，依次是23、35、55、57、76、88、98，若采用二分查找法在该数组中查找数据98，需要查找的次数是：（A）1 （B）2 （C）3 （D）413.某VB程序代码如下：Private Sub Command1_Click()For i = 1 To 10s = s + sina(i)Next iPrint sEnd Sub其中sina是一个自定义函数，则程序运行后的出错信息是：A BC D二、综合题：本大题5小题，其中第14题2分，第15题4分，第17题4分，第18题5分，共19分。

绝密★考试结束前2017年11月浙江省普通高校招生选考科目考试技术试题姓名：准考证号：考生须知：本试题卷分两部分，第一部分信息技术，第二部分通用技术。

全卷共16页，第一部分1 至10页，第二部分11至16页。

满分100分，考试时间90分钟。

其中加试题部分为30分，用【加试题】标出。

1.答题前，请务必将自己的姓名、准考证号用黑色字迹的签字笔或钢笔填写在答题纸上。

2.答题时，请按照答题纸上“注意事项”的要求，在答题纸相应的位置上规范作答，在本试题卷上的作答一律无效。

3.非选择题的答案须用黑色字迹的签字笔或钢笔写在答题纸上相应区域内，作图时可先使用2B铅笔，确定后须用黑色字迹的签字笔或钢笔描黑，答案写在本试题卷上无效。

第一部分信息技术（共50分）一、选择题（本大题共12小题，每小题2分，共24分，每小题列出的四个备选项中只有一个是符合题目要求的，不选、错选、多选均不得分。

）1．下列有关信息的说法，不正确的是A.信息在重复使用中会产生损耗B. 信息无处不在，且呈现现形式多样C.信息的传播、存储必须依附于某种载体D.信息经过加工、处理可以具有更高的使用价值2．超文本传输协议用于浏览器与WEB服务器之间的信息传输，该协议的简称是A. WEBB.WWWC. HTTPD. HTML3．下列应用中，体现了人工智能技术的有①机器人通过语音与人交流②饮水机根据水温自动加热③宾馆通过专用系统进行人脸识别，核实住宿人员身份④计算机程序根据输入的三条边长自动计算三角形面积⑤停车管理系统通过拍摄识别车牌号码，并用语音进行播报A.①②③B.①③⑤C.②④⑤D.③④⑤4．使用Access软件打开数据库，部分界面如下图所示，下列说法正确的是A.Access软件是数据库应用系统B.当前打开的数据表名称是“zjtj”C.当前打开的数据表共有4个字段D.删除当前记录后，该删5．某算法的部分流程图如右图所示，执行这部分流程后，输出a,b的值分别是A.5,8B.4,8C.5,11D.4,116.十进制正整数n转换为二进制数，该二迸制数末位是“0”。

算法加试题一周一练——宁吃百日苦，不留终身憾！行政班： 教学班： 姓名： 学号：算法题解题步骤：①阅读题目 ②理解题意 ③阅读程序④分析算法⑤分析程序和解题【加试题】小明编写了一个字母数字分类程序，功能如下：在文本框Text1中输入一个由字母和数字组成的字符串。

单击按钮Command1后，在列表框List1中显示所有数字，在列表框List2中显示所有字母。

程序运行界面如下图所示：图a图b图c（1）如图b 所示要在窗体上添加按钮对象，应该选择 （填字母）。

（2）如图a 所示，要修改按钮上“分类”的字体大小，应该修改按钮的 （填对应的属性名）属性。

（3）如图c 所示，其中CommandButton 是 （填：对象名/类名/事件名/属性名）。

（4）代码“List1.AddItem a(i)”中的AddItem 是 （填：对象名/方法名/事件名/属性名）。

（5）代码Command1_Click( )”中的Click是（填：对象名/方法名/事件名/属性名）。

（6）实现上述功能的VB程序如下。

请在划线处填入合适代码。

Const max = 100Dim a(1 To max) As String '存储字符串中的数字字符Dim b(1 To max) As String '存储字符串中的字母Private Sub Command1_Click()Dim s As String, ch As StringDim pa As Integer, pb As Integers =pa = 1: pb = 1For i = 1 To Len(s)If mytest(ch) Thena(pa) = chpa = pa + 1Elseb(pb) = chEnd IfNext iFor i = 1 To pa – 1 '在列表框1中输出List1.AddItem a(i)Next iDo While i < pb '在列表框2中输出List2.AddItem b(i)i = i + 1LoopEnd SubFunction mytest(x As String) As Boolean '函数功能:判断是否数字字符If x >= "0" And x <= "9" ThenElsemytest = FalseEnd IfEnd Function参考答案Text1.Textch = Mid(s, i, 1) pb = pb + 1i = 1mytest = True。

2017届浙江技术选考第二轮复习VB 算法加试题复习十七一、选择题：本大题共5小题，每小题3分，共15分。

在每小题给出的四个选项中，只有一个是符合题目要求的。

1．判断x 是否在区间(a, b]上，以下正确的VB 表达式是A ． a<x<=bB ．x>a and x<=bC ．x>a or x<=bD ．x>=a and x<=b2．在VB 中，下列控件既有Name 属性又有Text 属性的是A ．LabelB ．TextBoxC ．TimerD ．CommandButton3．将数学表达式1sin30o8++x e (e 表示欧拉数，约为2.71)写成VB 表达式，正确的是A ．e^8 + Sin(3.14/6) / Sqr(x + 1)B ． Exp(8) + Sin(3.14/6) / Sqr(x + 1)C ． e^8 + Sin(30) / 1+xD ．Exp(8) + Sin(30) / 1+x4．某VB 程序代码如下：Private Sub Command1_Click()a = "happy"For i = 1 To Len(a)x = Mid(a, i, 1) + xNext iText1.Text = xEnd Sub程序运行后文本框Text1上显示的内容是A ．yppahB ．happyC ． y p p a hD ．h a p p y5、有如下VB 程序段：Private Sub Command1_Click()Dim a(1 To 5) As IntegerRandomizeFor i = 1 To 5a(i) = Int(Rnd * 21) + 10Next in = 5For i = 1 To n - 1For j = n To i + 1 Step -1If a(j) < a(j - 1) Thenc = a(j): a(j) = a(j - 1): a(j - 1) = cEnd IfNext jNext iFor i = 1 To nList1.AddItem a(i)Next iEnd Sub运行程序段后，显示在列表框List1上的内容可能的是A．16 16 21 22 24 B．16 18 20 28 31C． 9 10 11 12 13 D．30 21 20 15 14二、综合题：本大题共2小题，其中第6小题4分，第7小题6分，共10分。

专题五算法与VB语言基础挖命题【考情探究】分析解读本专题的内容涉及算法及算法的表示、VB程序设计环境、VB程序设计基础知识三个方面。

从学考和选考试题来看,以选择题和非选择题形式考查学生对基本知识的理解掌握。

复习时应着重提高VB程序设计的实战能力。

在目前出现的真题中,有些题型是比较固定的,比如在选择题(学考部分)中均有一题考查循环结构流程图;第14题的第(1)小题均考查了面向对象程序设计的基础知识;在程序大题中经常出现分析题,题目中给出算法分析及代码,然后给出一个实例,求该实例的结果。

加试题中除了要求对几个经典算法熟练掌握之外,题中还有大量一维数组的应用,事实上经典算法如排序、查找也是基于一维数组与循环语句的综合应用。

因此熟练掌握数组和VB基本语句语法,才是解题的关键点。

以目前的真题来看,一般选择题第11题和第12题,会考到一个数组运用,不一定是经典算法,该题主要考查数组和语句综合运用,通常该题需要较长的解题时间。

此外第17题大题一般也不考经典算法,而是考查数组的综合运用,比如加密解密问题、压缩解压缩问题、矩阵问题等,该题往往是整卷最难的题,做题时,需要合理分配时间,并且可以考虑分步拿分。

破考点【考点集训】考点一算法及算法的表示1.(2015浙江10月学考+选考,5,2分)某算法的部分流程图如图所示。

执行这部分流程后,“x←x-2”被执行的次数为( )A.0B.1C.2D.3答案C2.(2018宁波十校联考,5,2分)某算法流程图如图所示,执行这部分流程,变量sum的值为( )A.1B.3C.4D.0答案A考点二面向对象程序设计基础1.(2017浙江11月学考+选考,14,1分)要使程序运行时,窗体Form1标题显示“字符串生成”,可在Form_Load 事件过程中添加语句(单选,填字母:A.Form1="字符串生成" / B.Form1.Text="字符串生成"/C.Form1.Caption="字符串生成")。

浙江省高中信息技术选考加试题VB专项练习题三一、选择题：本大题13小题，第小题2分，共26分。

在每小题给出的四个选项中，只有一个是符合题目要求的。

1.下列问题能用算法解决的是：（A）求出所有偶数的和（B）利用计算机证明任何一个偶数都可以用二个素数的和来表示（C）要求计算机在1年内统计出宇宙中所有星星的数量（D）为了鉴定一篇文章是否抄袭了另外一篇文章，用计算机比较两篇文章的相似度2.下列可作为VB变量名的是：（A）len （B）sqrter （C）93edu （D）dim3.下面语句中的等号“=”作用与其它选项不同的是：（A）if a=b then （B）do while x=y+5（C）if not(F) then x=5 （D）if Mpos+w10=9 then4.将数学表达式ln5+2ab写成VB表达式，正确的是：（A）Log(5)+2ab（B）Ln(5)+2*a*b（C）log(5)+2*a*b （D）Log(5)/log(10)+2ab5.有如下VB程序段x="45"y="25"c=val(x+y)该段程序执行后，变量c的值是：（A）4525 （B）70 （C）25 （D）456.某VB程序代码如下：Private Sub Command1_Click()a = "330903"For i = 1 To Len(a)x = Mid(a, i, 1) + xNext iPrint xEnd Sub则程序运行后的输出结果是：（A）330903 （B）030933 （C）309033 （D）3303097.已知x是一个字符，下面有关VB语句“y=chr(asc(x)+1)”的作用说法正确的是：（A）y代表x后面一个字符（B）y代表x后面一个字符的ASCII码值（C）x代表y后面一个字符（D）x代表y后面一个字符的ASCII码值8.有如下VB程序段用于计算并联电阻的值，假设输入的电阻值都大于10。

浙江省高中信息技术选考加试题VB专项练习题五及答案1.下列有关算法的说法正确的是：A) ①②正确改写：在实际查找中，顺序查找比二分查找更慢且不稳定；选择排序是冒泡排序的改进。

2.下列可作为VB变量名的是：A) www正确改写：www可以作为VB变量名。

3.将数学表达式 y3+3+y/a 写成VB表达式，正确的是：C) Sqr(y^3)+(3+y)/a正确改写：y的三次方根加上（3+y）除以a的结果。

4.VB表达式 Int(-3.5) + Len(Str(3.5)) + Int(Rnd(0)) * 2 的值是：C) 2正确改写：取-3.5的整数部分为-4，将3.5转换为字符串后长度为3，随机数取整为0，乘以2为0，相加为2.5.下列VB函数中，返回值类型一定为整数的是：B) len和fix正确改写：len和fix函数的返回值类型一定为整数。

6.某VB程序代码如下：Private Sub Command1_Click()p = 10s = 1Do While p。

= sp = p + 1s = s + pLoopPrint p,sEnd Sub则程序运行后的输出结果是：C) 1211正确改写：将p初始化为10，s初始化为1，当p大于等于s时，p加1，s加p，直到p小于s为止，输出p和s的值。

7.某VB程序代码如下：Private Sub Command1_Click()Dim x As Integer。

y As Integer。

z As Integery = 10z = 4x = y / zk = Int(y / z)Print x。

kEnd Sub则程序运行后的输出结果是：B) 2 2正确改写：将y初始化为10，z初始化为4，x等于y除以z的结果，k等于y除以z取整的结果，输出x和k的值。

8.某VB程序段代码如下：Private Sub Command1_Click()Dim i As Long。

2017届浙江技术选考第二轮复习VB 算法加试题复习五一、选择题：本大题共5小题，每小题3分，共15分。

在每小题给出的四个选项中，只有一个是符合题目要求的。

1．计算表达式222222123499100-+-++-…的算法流程图如下图所示，则虚线框部分的内容是A ．B2．在窗体上有一个名为Text1的文本框。

当光标在文本框中时，如果按下字母键“A ”，则被调用的事件处理过程是A ．Form_KeyPress( )B ．Command1_click( )C ．Text1_Click( )D ．Text1_Change( )3．在VB 中，先后定义了Const x = 3和Dim y as Integer ，则下列赋值语句正确的是A ．x=x+yB ．x+y=4C ．y=x+yD ．x=34．在VB 中，当前属性窗口如下图所示, 请问该窗体中共有几个对象可分成几类？A．1 1 B．9 4 C． 8 4 D．8 55．某数组有10个元素，依次为13、25、43、45、50、66、67、85、99、100。

采用对分查找法在该数组中查找数据99，需要查找的次数是A．3 B．4 C． 6 D．9二、综合题：本大题共2小题，其中第6小题4分，第7小题6分，共10分。

6．下列VB程序运行时，在文本框Text1中输入“abc”（不包括引号）单击命令按钮Command1后，文本框Text2中显示的内容是，循环刚退出时变量i的值为___________。

Private Sub Command1_Click()Dim ch As StringDim s As StringDim i As IntegerDim n As Integers = ""ch = Text1.Textn = Len(ch)For i = 1 To ns = s + Mid(ch, 1, i)Next iText2.Text = sEnd Sub7．青年歌手大赛共有10名裁判，歌手的得分为10个得分中去掉2个最高分、2个最低分，其余6个得分的平均分。