2017-2018学年浙江省金华市义乌市群星外国语学校高三（上）月考信息技术试卷（1月份）
发布：2024/4/20 14:35:0
一、选择题（本大题共12小题，每小题2分，共24分．在每小题给出的四个选项中，只有一个符合题目要求）
-
1．微信新骗局：骗子取一个类似“交通违章查询”这样的公众账号，一旦用户信以为真，向该公众号发送截图，会收到提示“需要提交你刚刚收到的手机验证码”，若将验证码发过去，用户微信钱包的钱就会被立即转走．这说明信息具有（ ）
组卷：8引用：3难度：0.9 -
2．用邮件客户端收取邮件时，使用下列哪个协议（ ）
组卷：8引用：6难度：0.9 -
3．算式（10011）2-（11）16的运算结果是（ ）
组卷：8引用：4难度：0.7 -
4．防止黑客入侵的方法，最有效的是（ ）
组卷：10引用：1难度：0.9 -
5．下列哪一个表达式能产生一个属于区间[100，999]内的整数（ ）
组卷：17引用：1难度：0.7
二、非选择题（本大题共5小题，其中第13小题4分，第14小题5分，第15小题8分，第16小题3分，第17小题6分，共26分））
-
16．小明编写了一个VB程序，功能如下：在文本框Text1中输入一段英文，并在文本框Text2中输入英文段落中的某个单词（或字符串），单击“最大间距”按钮（Command1）后，在文本框Text3中显示该单词在文中某两次出现的最大间距，若只出现一次或不出现则显示值为0．程序运行界面如图所示：
实现上述功能的VB程序如下：
Private Sub Command1_Click （ ）
Dim a（1To 1000）As String'数组a存储文中出现该指定单词（或字符串）的各个位置
Dim s As String,c As String,ch As String
Dim n As Integer,max As Integer,i As Integer
s=Text1．Text
c=Text2．Text
n=0：Max=0
For i=1To Len（s）-Len（c）+1
ch=①
If ch=c Then
n=n+1
a（n）=i
If n＞=2Then
If a（n）-a（n-1）-Len（c）＞Max Then Max=a（n）-a（n-1）-Len（c）
End If
End If
Next i
Text3．Text=②
End Sub
以上程序段运行时，为了实现上述功能，横线处①和②应填入的代码分别为：
（1）； （2）。组卷：2引用：2难度：0.6 -
17．明明设计了某企业职工IC卡查询系统，输入职工的卡号，可以查出该卡号对应的余额．所有职工的IC卡号和相应的余额已分别保存在zg数组（按从小到大排序）和ye数组中，第i个职工卡号保存在zg（i）中，对应的卡号余额保存在ye（i）中．
程序界面如图所示，左边列表框List1中显示的是部分职工的卡号和余额，在文本框Text1中输入职工的IC卡号，单击“查询余额”按钮（Command1）后，如果找到此卡号，则在标签Lab3中显示“此卡号余额为”和对应的余额值，如果未找到则显示“找不到此卡号，请重新输入”．
解决此问题的部分程序段如下：
Const n=500'设卡号总数为500
Dim zg（1To n） As Long
Dim ye（1To n） As Single
Private Sub Form1_Load （ ）
'此过程用于对数组zg和数组ye进行初始赋值，代码略
End Sub
Private Sub Command1_Click （ ）
Dim x As Long,i As Long,j As Long,m As Long,find As Boolean
x=Val（Text1．Text）
i=1：j=n：find=False
Do While ①
②
If x=zg（m） Then
③
ElseIf x＜zg（m） Then
j=m-1
Else
i=m+1
End If
Loop
If find=true Then
Lab3．Caption=″此卡号余额为″+Str（ye（m））+″元″
Else
Lab3．Caption=″找不到此卡号，请重新输入″
End If
End Sub
在程序①、②、③横线处填入适当的语句或表达式．将程序补充完整：
（1）程序中①横线处应填入．
（2）程序中②横线处应填入．
（3）程序中③横线处应填入．组卷：7引用：2难度：0.1
