2019-2020学年浙江省丽水市高二（上）质检信息技术试卷（1月份）
发布：2024/4/20 14:35:0
一、选择题（本大题共12小题，每小题2分，共24分，每小题列出的四个备选项中只有一个是符合题目要求的，不选、错选、多选均不得分．）
-
1．下列关于信息和信息技术的说法，正确的是（ ）
组卷：3引用：1难度：0.7 -
2．下列有关网页和电子邮件的说法，正确的是（ ）
组卷：0引用：1难度：0.6 -
3．下列应用，没有体现人工智能技术的是（ ）
组卷：4引用：1难度：0.6 -
4．使用Access软件创建的“学生信息”数据表，其设计视图的部分界面如图所示。下列 说法正确的是（ ）组卷：0引用：1难度：0.7 -
5．使用UltraEdit软件观察字符的内码，部分界面如图所示。下列说法正确的是（ ）
组卷：1引用：1难度：0.6
二、非选择题（本大题共4小题，其中第13小题4分，第14小题8分，第15小题7分，第16小题7分，共26分）
-
15．编写VB程序，实现在1到40中随机抽取n个不重复的数字。在文本框Text1中输入 需要抽取的个数n,单击“抽取”按钮Command1，在列表List1中输出结果，程序设计界面如图a所示。请回答下列问题：
（1）在设计程序界面时，应使用图b所示“控件工具箱”中的（填写相应编号）添 加列表框。
（2）实现上述功能的VB程序如下，请在横线处填写合适的代码。
PrivateSubCommand1_Click （ ）
Dima（1To40）AsInteger DimiAs Integer List1．Clear
n=Val（Text1．Text） Randomize
Fori=1To n’随机生成[1，40]之间的正整数 For j=1
Toi-1
Ifa（j）=a（i）Then i=
EndIf
Nextj
Nexti
Fori=1Ton
List1．AddItemStr（a（i））
Nexti
EndSub
（3）加框处代码有误，请改正。
（4）运行程序，在文本框Text1中输入41，单击“抽取”按钮，程序错误提示为。
（填写字母：A．溢出 B．下标越界 C．缺少对象）组卷：0引用：1难度：0.5 -
16．编写VB程序，实现如下功能：在文本框Text1中输入一串字符，单击“统计”按钮Command1，统计每个英文字母（不区分大小写）出现的次数，找出出现次数最多的字 母，在标签Label1中显示结果。运行效果如图所示。
（1）实现上述功能的VB程序如下，请在横线处填入合适的代码。
PrivateSubCommand1_Click （ ）
DimiAsInteger,n AsInteger,maxAsInteger
Dima（1To26）AsInteger'数组a存放26个大小写字母出现的次数 DimstAsString,chAs String
st=Text1．Text
Fori=1ToLen（st）
Ifch＞=″A″Andch＜=″Z″Then n=Asc（ch）-Asc（″A″）+1 a（n）=a（n）+1
ElseIfch＞=″a″Andch＜=″z″Then n=
a（n）=a（n）+1
EndIf
Nexti
max=a（1）
Fori=1 To26
IfThen max=a（i）
EndIf Nexti st=″″
Fori=1 To26
Ifmax=a（i）Then
st=st+″″+Chr（Asc（″A″）+i-1）EndIf
Nexti
Label1．Caption=“出现次数最多的字母是：″&st&″″&″出现次数为：″&Str（max） EndSub
（2）在文本框Text1中输入字符串“ABCEEEEffee333333”，运行程序时，标签Label1 中输出结果为：出现次数最多的字母是：出现次数为：。组卷：0引用：1难度：0.3
