2016年4月浙江省普通高校招生选考科目考试模拟测试技术试题（四）（教师版）倪俊杰.docVIP

学科网2016年4月浙江省普通高校招生选考科目考试模拟测试 技术试题（四） 第一部分 信息技术（50分） 选择题部分 一、选择题（本大题共12小题，每小题2分，共24分。在每小题给出的四个选项中，只有一个符合题目要求） 1.下列有关信息的说法，不正确的是（ ） 同样的信息可以有不同的载体 给学考的同学分配准考号，属于信息的编码 古代没有信息，只有信息时代才有信息。 很多手机都有屏幕锁，是为了提升信息的安全性 【答案】【】【答案】【】【答案】【】【答案】【】【答案】【】【答案】【】【答案】【】【答案】【】【答案】【】． 第10题表 第10题图 若某一时段允许车辆左转，但不允许车辆直行和右转，则此时的控制码应该是 ABCD 【答案】【】．A．Change B．Click C．KeyPress D．DblClick 【答案】【】．某数组有10个元素，依次为11、21、35、44、51、64、78、81、92、98，若采用对分查找法在该数组中查找数据92，依次被访问的数据为 A．51、81、92 B．51、78、81、92 C．64、81、92 D．64、81、98、92 【答案】【】【答案】【】Private Sub Command1_Click() a = Val(Text1.Text) ① （填程序代码） For i = 1 To 4 s = s + a Mod 10 a = ② (选填字母,从下列A、B、C、D四个选项中选取一项） Next i ③ (选填字母,从下列A、B、C、D四个选项中选取一项） End Sub Private Sub Command2_Click() Text1.Text = Text2.Text = End Sub 划线②、③处的选项: A.a/10 B.a\10 C. Text2.Text = Str(s) D. Text2.Text = （2）如果输入的是一个五位正整数，在第14题-2图中应该修改第 行的代码。 【答案】【】【答案】【】VB应用程序，用户输入的。‘函数IsLetter(x)功能，若x是字母，则返回值为字母x在字母序列“A”~“Z”中的序号，如字母“A”的序号为0，字母“D”的序号为3。若x不是字母，则返回值为-1。 Function IsLetter(x As String) As Integer If A = x And x = Z Then IsLetter = Asc(x) - Asc(A) ElseIf a = x And x = z Then IsLetter = Asc(x) - Asc(a) Else ①______ End If End Function Private Sub Command1_Click() Dim f(25) As Integer, m As Integer, n As Integer Dim s As String, c As String List1.Clear For m = 0 To 25 ‘初始化数组f f(m) = 0 Next m s = Text1.Text For m = 1 To Len(s) ‘依次读取字符串中的每个字符进行判断 c = Mid(s, m, 1) n = IsLetter(c) If n -1 Then f(n) = f(n) + 1 Next m For m = 0 To 25 ‘输出统计结果，没有出现的字母不输出 If ② Then List1.AddItem (Chr(m + Asc(a)) : f(m)) End If Next m End Sub 【答案】【】a和b分别保存会员卡号和对应的积分，单击“统计前10名”按钮（Command1）后，积分最高的前10名会员卡号和对应积分