2015-2016学年浙江省绍兴一中高二（下）期末信息技术试卷
发布：2024/4/20 14:35:0
一、选择题（本大题共9小题，每小题2分，共24分．在每小题给出的四个选项中，只有一个符合题目要求）
-
1．备受中外瞩目的上海迪士尼内部测试启动后有一些帖子在微博微信上热转，有声称来自浙江、南京、重庆等全国近20个省市的“第一批体验上海迪士尼的人”发文吐嘈迪士尼消费太高，表示“哭晕在厕所”．有人梳理对比发现，这些文章使用的是同一组照片，文章内容几乎相同，仅仅只是客源地不同．下列说法正确的是
（ ）组卷：9引用：1难度：0.9 -
2．把校园卡放在食堂读卡机上马上会显示出当前卡内余额，此时一卡通系统对数据库进行的操作是（ ）
组卷：7引用：1难度：0.9 -
3．刘明在使用OCR软件进行文字识别时出现如图所示情况，为提高识别正确率，在重新识别前他应该先进行的操作是（ ）组卷：6引用：2难度：0.9 -
4．小明要创作一个主题为“让文明成为习惯”的多媒体作品．在创作之前对这个作品的使用频度、所需资金及产生的经济效益进行分析，这属于（ ）
组卷：11引用：4难度：0.9 -
5．如果a,b,c均为整型变量，其中a=3，b=4，执行以下语句，变量a,b的结果与其他几项不同的是（ ）
组卷：8引用：2难度：0.7
四、加试题
-
16．小刘想编写一个字符串转换程序，在文本框Text1中输入原始字符串，单击“转换”按钮Command1后，将其中的小写英文字母转换为大写，并在文本框Text2中显示．程序运行效果如图所示．
实现上述功能的VB代码如下，但加框处代码有错，请改正．
Private Sub Command1_Click （ ）
Dim a As String,b As String
Dim i As Integer,c As String
a=Text1．Text
For i=1To Len（a）
c=Mid（a,i,1）
b=upcase（c）+b'（1）
Next i
Text2．Text=Str（b）'（2）
End Sub
'将小写字母转换为大写字母
Private Function upcase（c As String） As String
If c＞=“a“And c＜=“z“Then
upcase=Chr（Asc（c）-32）
Else
upcase=c
End If
End Function.组卷：2引用：1难度：0.1
加试题
-
17．下列VB程序的功能是：程序运行时，单击命令按钮Commandl后，产生10个[1，999]范围内互不相同的随机整数，依次显示在列表框List1中，然后将它们按从小到大的顺序排序，排序结果显示在列表框List2中．数组a用于存储产生的10个随机整数，变量f用于标记随机整数x与已生成的整数是否有重复，如有则为True,没有则为False.
为实现上述功能，请在横线处填入合适的代码．
Dim a（1To 10）As Integer
Private Sub Command1_Click （ ）
Dim n As Integer'n用于统计已经产生的随机整数个数
Dim i As Integer,j As Integer
Dim x As Integer,k As Integer
Dim f As Boolean
Randomize
n=0
List1．Clear
List2．Clear
Do While n＜10
x='产生[1，999]范围内的随机整数
f=False
For i=1To n
IfThen f=True
Next i
If f=False Then
n=n+1
a（n）=x
List1．AddItem Str（a（n））
End If
Loop
For i=1To 9
For j=10To i+1Step-1
IfThen
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.组卷：11引用：1难度：0.3
