2017年浙江省普通高校高考信息技术模拟试卷（14）
发布：2024/4/20 14:35:0
一、选择题（本大题共11小题，每小题2分，共24分．每小题列出的四个备选项中只有一个符合题目要求，不选、多选、错选均不得分）
-
1．小军在浏览器地址栏中输入网址时，发现曾经输入过的网址会随着键入的字符自动显示，要想不显示以前访问过的网址，可进行的操作是（ ）
组卷：5引用：9难度：0.7 -
2．淘宝用户对某一产品的宝贝评论如图所示，该过程中采用的评价方法有（ ）
组卷：20引用：9难度：0.7 -
3．小明用Word软件编辑文档时界面如图所示：文档中图片的文字环绕方式是（ ）
组卷：11引用：1难度：0.9 -
4．小红从网上下载了一个Wave格式的高保真音频文件，并用GoldWave软件转换成了MP3格式，下列说法正确的是（ ）
组卷：4引用：2难度：0.5 -
5．小明在“我的多媒体作品设计”中写到“片头部分需要用到一台摄像机，后期剪辑需要一台计算机…”，这个过程属于（ ）
组卷：11引用：1难度：0.7
二、非选择题（本大题共5小题，其中第13小题4分，第14小题4分，第15小题5分，第16小题8分，第17小题5分，共26分）
-
15．【加试题】有一英文单词处理的Visual Basic程序，程序运行效果如图所示．在界面上方的文本框Text1中输入英文语句，单击“统计”按钮（Command1），在右下方的列表框List1中显示英文单词及其在语句中出现的位置，并在按钮上方的标签Label2中显示单词个数（假定每个单词中不包含英文字母以外的其他字符）．
实现上述功能的VB代码如下，但加框处代码有错，请改正．
Private Sub Command1_Click（ ）
Dim a（1To 200）As String'数组a（i）用于存储单词
Dim d（1To 200）As Integer'数组d（i）用于存储符位置信息
List1．Clear
s=Text1．text
slen=Len（s）
j=0'用于记录单词字符个数
k=1'用于统计单词个数
b=1'用于统计字符位置
For i=1To slen
c=Mid（s,i,1）
If
Then'（1）
If j＜＞0Then
a（k）=Mid（s,b,j）
d（k）=b
k=k+1
j=0
End If
b=i+1
Else
j=j+1
End If
Next i
For i=1To k-1
List1．AddItem
+“”+a（i）'（2）
Next
Label2．Caption=Str（k-1）+“个”
End Sub.组卷：16引用：1难度：0.1 -
16．【加试题】下列VB程序的功能是：程序运行时，单击命令按钮Command1后，产生10个[1，999]范围内互不相同的随机整数，依次显示在列表框List1中，然后将它们按从小到大的顺序排序，排序结果显示在列表框List2中．
数组a用于存储产生的10个随机整数，函数f（x）用于判断随机整数x与已生成的整数是否有重复，若有重复则返回True,否则返回False.
（1）虚线框内程序段所采用的排序算法名称是．（填：冒泡排序/选择排序）
（2）在程序①和②横线处填入适当的语句或表达式，把程序补充完整．
Dim a（1To 10）As Integer
Function f（x As Integer）As Boolean
'代码略
End Function
Private Sub Command1_Click（ ）
Dim n As Integer'n用于统计已经产生的随机整数个数
Dim i As integer,j As Integer
Dim x As Integer,k As Integer
Randomize'初始化Rnd函数
n=0
List1．Clear'清除列表框中内容
List2．Clear
Do While n＜10
x=lnt（Rnd*999）+1'产生[1，999]范围内的随机整数
If Not f（x） Then
n=n+1
a（n）=x
List1．AddItem Str（）
End If
Loop
For i=1To 9'进行排序
For j=10To i+1
If a（j）＜a（j-1）Then
k=a（j）：a（j）=a（j-1）：a（j-1）=k
End If
Next j
Next i
For i=1To 10
List2．AddItem Str（a（i））
Next i
End Sub.组卷：17引用：2难度：0.3
