1.对口高考计算机类专业课综合模拟试卷一(试卷)PDF.pdf

A．直通线
B．交叉线
C．全反线
D．均可使用
15．计算机网络通信双方的应答关系属于通信协议三要素的（ ）。
A．语法
B．语义
C．交换规则
D．都不属于
16．10Base-5 网中，以下说法不对的是（ ）。
A．10 指的是传输速率为 10Mbps
B．Base 指的是基带传输
C．5 指的是 5 类双绞线
D．10Base-T 是以太网的一种类型
C．将窗体的BorderStyle置成None
D．将窗体的ContalBox置成False
20．设有如下程序：
Private Sub Form_ Click ()
Dim arr1(10, 10) As Integer
Dim i, j As Integer
For i = 1 To 3
For j = 2 To 4
D．属性窗口
4．Visual Basic 的工程文件的扩展名是(
)
A．.for
B．.frm
C．.vbp
5．数据 36345 是(
)数据。
A．整型
B．长整型
C．字符型
6．下列(
)是正确的日期型数据。
A．@11/12/2010@
B．#11/12/2010#
C．\11/12/2010\
D．&11/12/2010&
2．求 S=1！+2！+3！+…+5！请在空白处填入正确答案。
S=0
For i=1 To 5
【4】________
For j=1 To【5】_______
T=【6】______
【7】_________
S=【8】_______
Next i
Print "结果是：" & S
3．下面程序段的功能是：在文本框中输入一个数据，如果该数据满足 “既能被 5 整除，又能被
(
)
A．Command1.Enabled=True
B．Command1.Enabled=False
C．Command1.Visible=True
D．Command1.Visible=False
19．如果希望一个窗体在显示的时候没有边框，应该完成的操作是(
)
A．将窗体的Caption设成空字符
B．将窗体的Enabled属性置成False
A．计算机
B．终端
C．终端控制器
D．移动终端
7．第二代计算机网络最具代表性的是（ ）。
A．Intranet
B．Ethernet
C．Apranet
D．Cernet
8．最新的 IPV6 技术采用的 IP 地址位数是（ ）。
A．16 位
B．32 位
C．64 位
D．128 位
9．TCP/IP 体系中的网络接口层对应 OSI 参考模型的（ ）。
Ⅱ.计算机网络技术与应用（100 分）
一、单项选择题（每题 2 分，共 50 分）
1．现代计算机网络采用的是（ ）交换技术。
A．电路交换
B．报文交换
C．分组交换
D．信号交换
2．在计算机局域网的设备中，工作原理与信号放大器相同的是（ ）。
A．网络适配器
B．集线器
C．交换机
D．路由器
3．下列不属于计算机网络软件范畴的是（ ）。
5．设有数组声明语句：Dim a (1 to 5, 4) as integer 则数组 A 中包括的元素有______个。
6．如果要时钟控件每 0.5 秒钟发生一个 Timer 事件,则 Interval 属性应设置为__________。
7．InputBox（）函数返回值的数据类型是______________。
A．物理层
B．链路层
C．网络层
D．物理层和链路层
10．在常用的标准中，（ ）标准不是 IEEE 委员会制定的。
A．FDDI 网标准
B．以太网标准
C．令牌总线网标准 D．令牌环网标准
11．利用（ ）命令，可以查看本机的 TCP/IP 配置情况。
A．netstat
B．arp
C．renew
D．ipconfig /all
xx(i) = 【19】_________ Next For i = 1 To 9 For j = 【20】_______ To 10 If xx(i) > xx(j) Then 【21】 _______________ End If Next 【22】_______________ For i = 1 To 10 Print xx(i); Next i End Sub 7．输出 3～100 之间所有素数。(提示：只能被 1 和自身整除的自然数称为素数。) Private Sub Command1_Click() For x = 3 To 200 f = -1 For i = 2 To【23】______ If【24】 ________ Then f=0 i=x End If Next i If【25】_______Then Print a; Next x End Sub 得分 评卷人
arr1(i, j) = i * j
Next j
Next i
Text1.Text = arr1(1, 3) + arr1(2, 4)
End Sub
程序运行后，单击窗体，在文本框显示的值是______。
A． 10
B． 11
C． 12
D． 20
二、填空题（本大题共 7 小题，每空 1 分，共 10 分）
7．以下各项中可以作为 VB 变量名的是(
)
A．85
B．int.sum
C．A52B
8.表达式5 / 2 * 6的值是(
)
A．15
B．24
C．12
9．表达式"XYZ" + "487"的值是(
)
A．“XYZ487”
B．“XYZ”
C．“487”
10．在VB中，复写框（Check）的Value值有三种，分别是(
12．构建有线电视网 CATV 应使用的传输介质为（ ）。
A．屏蔽双绞线
B．宽带同轴电缆 C．光纤
D．微波
13．在 Internet 中采用存储转发的方式传输数据的协议是（ ）。
源自文库
A．HTTP
B．FTP
C．Telnet
D．SMTP
14．两台交换机通过 Uplink 级联口连接时，应使用的网络连接电缆为( )。
Dim a As Variant
a=Array(1,2,3,4,5)
Sum=0
For i=1 To 5
Sum = sum+a(i)
Next i
x=Sum/5
For i =1 To 5
If a(i)>x Then Print a(i);
Next i
End Sub
程序运行后，单击命令按钮，在窗体上显示的内容是(
1．决定标签内显示内容的属性是(
)
A．Text
B．Name
C．Alignment
2．下面值为真的逻辑表达式是(
)
A．"A" > "a"
B． "9" > "a"
C．"That" > "Thank"
3．在设计阶段，当双击窗体上的某个控件时，所打开的窗口是(
)
A．工程资源管理器窗口
B．工具箱窗口
C．代码窗口
)
A．1 2
B．1 2 3
C．3 4 5
D． 4 5
17．下面程序段运行后的输出结果是(
)。
Dim a(20) As Integer, i％
For i=1 To 20
a(i)=i*i
Next i
Print a(2)+a(3)+a(4)
A．14
B．20
C．25
D．29
18．设有命令按钮Command1，为了在运行时使该命令按钮失效（变灰），正确的属性设置为
1．Visual Basic提供了结构化程序设计的三种基本结构，三种基本结构是_________ 、
_________和 ________。
2．布尔型数据只有________和________两个值。
3．用 Dim x as variant 定义的变量 x ,其类型是____________。
4．产生一个[30，100]范围内的随机数的表达式是_______________ 。
)
A． -1，0，1
B． 0，1，2
C． 1，2，3
D．True，False，0
D．Caption D． 12>12.1
D．.bas D．日期型
D．2ab D．0 D．“487XYZ”
11．下列程序段的运行结果是：(
)
Dim A As Integer , B As Integer , X As Integer A = 1 ：B = 2
书山有路
2016 年内蒙古自治区高等职业院校
对口招收中等职业学校毕业生第一次模拟考试
计算机类专业课综合试卷
注意事项：本试卷共 8 页，满分 350 分，考试时间为 150 分钟；
题号
Ⅰ
Ⅱ
Ⅲ
Ⅳ
分数
总分
得分 评卷人 Ⅰ．Visual Basic 程序设计（100 分）
一、单项选择题(本大题共 20 小题，每小题 2 分，共 40 分。)
For x=1 to 2
For y=1 to x
Next y
Next x
A．1
B．2
14．下列程序段的执行结果为(
)
Private Sub Form_Load()
s=0
For i = 1 To 5
s=s+i*i
Next i
MsgBox (s)
End Sub
A．0
B．55
15．下面程序段运行后的输出结果是(
IF A < B THEN X = A - B ELSE X = B + A
PRINT X
A．-1
B．1
12．下列程序段的运行结果是：(
)
Dim F As Long , I As Long
F=0
For I = 3 To -3 Step –1
F=F+I
Next I
Print I A．-5
B．5
13．下面程序段运行时内层循环的循环总次数（
A．网络操作系统 B．网络管理软件 C．网络通信协议 D．网络互联设备
4．建筑物之间有重型电力设备和强干扰源时，布线时应选用的通信媒体是（ ）。
A．同轴电缆
B．非屏蔽双绞线 C．光缆
D．电话线
3
书山有路
5．以下协议属于 OSI 模型中应用层的协议是（ ）。
A．FTP
B．IP
C．UDP
D．TCP
6．下列设备中，不属于计算机网络的访问结点设备的是（ ）。
7 整除”这个条件，则输出；否则，清除文本框的内容，并将焦点定位在文本框中。
Dim x As Integer
2
书山有路
x=【9】______________________ If 【10】_______________________ Then Print x Else Text1.Text=“” 【11】___________ End If 4．求任意两个数中的最大值，请在空白处填入正确答案。 Private Sub Command_Click ( ) Dim A As Single , B As Single , 【12】 _________ A = Val (Text1 . Text ) B =【13】 _________ IF A < B THEN 【14】________ ELSE M=A End If Text3 . Text =【15】______ End If 5．如下程序的功能是用 Array 函数建立一个含有 10 个元素的数组,然后查找并输出该数组中的 最小值,请填空: Option Base 1 Private Sub Command1_Click() Dim arr1 Dim Min As Integer, i As Integer arr1 = Array(10, 43, 47, -24, 8, 4, 66, 3,55,69) Min =【16】__________ For i =【17】______ If arr1(i) < Min Then 【18】____________ Next i Print "最小值是:";Min End Sub 6．利用随机函数产生 10 个[0，100]的随机整数，从小到大顺序输出。 Private Sub Command1_Click() Randomize()Dim xx(10) As Integer For i = 1 To 10
三、程序填空题（在方括号“[ ]”后面的横线“______”上填上正确的答案，每空 2 分，共 50 分。）
1．下面这段程序是求 1～100 的偶数之和。
sum=【1】___________
For i=【2】___________
sum=sum+【3】___________
Next i
Print “sum=”；sum
17．网络层传输的数据单位称为（ ）。
A．帧
B．分组
C．包
D．块
18．下列合法的 IP 地址是（ ）。
)。
n=0
DO
n=n+1
Loop Until n>=3
Print n A．1
B．2
C．2
C．0 ）。
C．3
C．25 C．3
1
D．3 D．–4 D．4 D．50 D．4
书山有路
16．在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：
Option Base 1
Private Sub Command1_Click()