2017年浙江省普通高校高考信息技术模拟试卷（9）
发布：2024/4/20 14:35:0
一、选择题（本大题共12小题，每小题2分，共24分．每小题列出的四个备选项中只有一个符合题目要求，不选、多选、错选均不得分）
-
1．某用户在根据导航软件设置好的导航路径行驶，途中高德地图提示前方有拥堵现象，建议改道，并实时提供新的导航路径，该实例最能体现信息的（ ）
组卷：15引用：2难度：0.9 -
2．某网页文件如图所示，对该网页文件的分析如下：
①该网页标题为：中国国家图书馆•中国国家数字图书馆
②该网站的URL为http://www.nlc.gov.cn/
③HTTP是超文本标记语言
④可将网页中的图片、文字、超链接等添加到收藏夹中
⑤可使用“FrontPage”软件编辑
其中正确的是（ ）
组卷：7引用：1难度：0.9 -
3．下列应用中，没有使用智能处理技术的是（ ）
组卷：12引用：2难度：0.9 -
4．使用Access软件创建数据表，存储如下表所示的图书信息：
则该数据表对应的结构恰当的是（ ）编号 书名 作者 书价 出版时间 出版社 SN-7208061644 追风筝的人 卡勒德•胡赛尼 ￥28.90 2014-01-01 上海人民出版社 组卷：10引用：4难度：0.7 -
5．使用UltraEdit软件观察字符内码，结果如图所示：
则车牌号“浙CN9999”的内码是（ ）组卷：5引用：4难度：0.9
二、非选择题（本大题共5小题，其中第13小题4分，第14小题4分，第15小题5分，第16小题8分，第17小题5分，共26分）
-
16．【加试题】数据插入．用VB设计程序，主要功能如下：随机产生15个200以内的正整数数列，按升序排序后显示在List1列表框中，在文本框Text1中输入1个200以内的正整数，单击“插入”按钮Command1后将其插入数列中，并保持数列仍然有序，显示在列表框List2中，同时在标签Label4中显示插入的位置，程序界面如图所示．
实现上述功能的VB程序代码如下，请在横线处填上合适的代码．
Dim a（1To 200）As Integer
Private Sub Command1_Click（ ）
Dim key As Integer
key=
i=1
Do While key＞a（i）And i＜=15
i=i+1
Loop
Label4．Caption=“该数插入的位置是：”+Str（i）
If i=16Then
a（i）=key
Else
For j=16To i+1Step-1
Next j
a（i）=key
End If
For i=1To 16
List2．AddItem a（i）
Next i
End Sub
Private Sub Form_Load（ ）
'随机生成15个200以内的正整数
Randomize
For i=1To 15
a（i）=Int（Rnd*200）+1
Next i
'将15个数从小到大排序
For i=1To 14
k=i
For j=i+1To 15
If a（k）＞a（j） Then
k=j
Next j
If i＜＞k Then
t=a（i）：a（i）=a（k）：a（k）=t
End If
Next i
'将排好序的数输出在列表框List1中
List1．Clear
For i=1To 15
List1．AddItem str（a（i））
Next i
End Sub
程序中①横线处应填
程序中②横线处应．组卷：15引用：1难度：0.1 -
17．【加试题】要求将某一字符串中指定的字符改写成小写或大写（如果原先是大写就改成小写，反之改成大写），并将处理后的字符重新输出．
程序界面如下图所示，在Text1中输入原始字符串，在Text2中输入需要改变的字符，单击“改变”按钮后，在Text3中输出处理后的结果．
程序代码如下：
Private Sub Command1_Click （ ）
Dim s As String,result As String,k As String
Dim zs As String,n As Integer
result=“”
s=Text1．Text
k=Text2．Text
For n=1To Len（s）
If zs=k Then
If Asc（zs）＞=65And Asc（zs）＜=90Then
zs=Chr（Asc（zs）+32）
Else lf Asc（zs）＞=97And Asc（zs）＜=122Then
zs=Chr（Asc（zs）-32）
End If
End If
Next n
End Sub
在程序①、②、③横线处填入适当的语句或表达式，把程序补充完整．
（1）程序中①横线处应填入．
（2）程序中②横线处应填入．
（3）程序中③横线处应填入．组卷：28引用：3难度：0.1
