山东省滨州市滨城区信息技术开学模拟考试卷（二）
试卷更新日期：2023-09-28 类型：开学考试
一、选择题
-
1. 下列属于Visual Basic逻辑常量的是（ ）A、"BASIC" B、2012 C、False D、3.14159262. 理论上，IPv4的地址个数是（ ）A、216 B、232 C、1016 D、10323. 使用OCR软件进行文字识别，部分界面如图所示：
则下列说法正确的是（ ）
A、单击区域③中的文字“天”，区域①中的“夭”字将变成“天”字 B、单击区域③中的文字“夭”，区域②中的“天”字将变成“夭”字 C、区域①中显示的是Yunnan.tif中的内容 D、当前正在进行区域划分操作4. 在PowerPoint 2000的“幻灯片切换”对话框中，允许的设置是( )。A、设置幻灯片切换时的视觉效果和听觉效果 B、只能设置幻灯片切换时的听觉效果 C、只能设置幻灯片切换时的视觉效果 D、只能设置幻灯片切换时的定时效果5. 有如下VB程序段：Dim a(1To 5)As Integer
i=1:n=5
Randomize
For i=1 To n
x=Int(Rnd*10)*2+1
If(x Mod 10+x\10)Mod 2=0 Then
a(i)=x
Else
a(n-i+1)=x
End If
Next i
数组元素的初值均为0，执行该程序段后，a（1）至a（5）的值可能的是（ ）
A、17，11，5，19，15 B、11，0，11，0，15 C、7，0，5，13，17 D、0，0，3，19，116. 以下IP地址中，属于B类地址的是（ ）。A、3.3.57.0 B、193.1.1.2 C、131.107.2.89 D、194.1.1.47. 某用户使用Word软件编辑文档，部分界面如下图所示：
对于文字“坐馆”处的操作，下列说法正确的是（ ）
A、修改“坐馆”为“做官” B、删除的内容为“坐馆” C、插入的内容为“做官” D、修改“做官”为“坐馆”8. 有如下 VB 程序段：Dim a(l To n) As Integer,y(l To n) As Integer, i As Integer, j As Integer
k=Val(Text1.Text)
For i=1 To n
y(i)=1
Next i
For i=1 To n
For j=1 To n
If a(i) < a(j) Then y(i)=y(i)+1
Next j
If y(i)=k Then List1.AddItem Str(a(i))
Next i
数组 a 的各元素的值为3，4，3，1，4，4，5，5，6，2，0， 在文本框中输入4，执行该段程序后 List1 中显示的值为（ ）
A、3 B、
C、
D、
9. 有如下VB程序段：i = 0: j = 1
Do While j <= 5
If a(j) <> 0 Then i = i + 1: a(i) = a(j)
j = j + 1
Loop
For j = i + 1 To 5
a(j) = 0
Next j
数组元素a(1)到a(5)的值依次为“0,20,0,4,31”，执行该程序段后，a(1)~a(6)各元素的值依次为（ ）
A、4,20,31,0,0 B、31,20,4,0,0 C、0,0,20,4,31 D、20,4,31,0,010. 下列关于网页和电子邮件的说法正确的是（ ）A、记事本不可以对网页文件进行编辑 B、超链接只能实现网页之间的跳转 C、电子邮件服务器之间传送邮件采用的协议是 SMTP D、POP3 协议的功能是把电子邮件发送到收件人的电子邮箱中11. 使用 word 软件编辑某文档，部分界面如下图所示：
下列说法正确的是（ ）
A、对第一行“闭幕式”添加批注，将出现批注[A3]: B、删除第 2 处批注的内容，“批注[A2]:”也会被删除 C、图中有 4 处修订，退出修订后，修订标记不会消失 D、开启修订编辑文档时，将记录对文档的所有修改12. 有如下VB程序段：s=Text1. Text
s1=" "
For i=1 To Len(s)
c= Mid(s, i, 1)
If c>= "A" And c <= "Z" Then
c= Chr(Asc(c)+ 32)
ElseIf c>="a"Andc<(="z"Then
c=Chr( Asc(c)-32)
End If
s1=c+s1
Next i
Text2. Text=s1
该程序段运行后，若在文本框Text1中输入 “Ab12CD”，则 文本框Text2中显示的内容是( )
A、aBcd B、dcBa C、aB12cd D、dc21Ba二、填空题
-
13. 下图是家庭网络的示意图，从图中所示可以推断出
(1)、该网络使用的子网掩码是：(2)、该网络的网关IP地址是：(3)、该网络最多能容纳的终端数为：14. 本程序的功能是：输入一个字符串，将该字符串反向输出。例如，输入：abcdefgh 输出：hgfedcba。请将下列程序补充完整。Dim s1 As String, s2 As String
Dim c As Integer, i As Integer
s1 = InputBox("请输入一串字符")
s2 = ""
c = Len(s1)
For i = ▲
s2 = Mid(s1, i, 1) + s2
Next i
Print s2
【函数功能提示】
⑴函数Len(x)的功能是：取字符串x的长度值（即字符个数值）。
若x="abc"，则Len(x)的值为3。
⑵函数Mid(x，y，z)的功能是：在字符串x中第y个字符开始取z个字符。
若x="abcdefg"，则 Mid(x，4，3)取得的值是"def"。
程序空白处应填写的语句是：。
三、判断题
-
15. 我们可以通过电子邮箱给远方的朋友发送电子邮件，但是在电子邮箱中只能发送文本而不能发送图片。
