一、单项选择题（在每小题的四个备选答案中，选出一个正确答案，并将正确回答的序号填在题干的括号内。每小题4分，共120分）
1、 计算机最主要的工作特点是( )。
A、存储程序与自动控制 B、高速度与高精度 C、可靠性与可用性 D、有记忆能力
2、在计算机中采用二进制，是因为（ ）。
A、可降低硬件成本 B、两个状态的系统具有稳定性
C、二进制的运算法则简单 D、上述三个原因
3、配置高速缓冲存储器(Cache)是为了解决（ ）。
A、内存与辅助存储器之间速度不匹配问题
C、CPU与内存储器之间速度不匹配问题
D、主机与外设之间速度不匹配问题
4、下列设备中，既能向主机输入数据又能接收主机输出数据的设备是（ ）。
A、CD－ROM B、显示器 C、软磁盘驱动器 D、光笔
5、完整的计算机硬件系统一般包括外部设备和（ ）。
A、运算器和控制器 B、存贮器 C、主机 D、中央处理器
6、人们常说486微机、586微机，其中的数字指的是 ( )。
A、硬盘的型号 B、软盘的型号 C、CPU的型号 D、CPU的处理速度
7、10位二进制转换成最大的无符号十进制数是（ ）
A、 511 B、 512 C、 1023 D、 1024
8、下列各进制数中最大的数是( )。
A、227Ｏ B、1FFH C、1010001B D、789D
9、汉字国标码与汉字内码的( )
A、 编码方法相同 B、作用相同
C、所占字节数相同 D、存储位置相同
10、 如果设汉字点阵为16×16，那么100个汉字的字型信息所占用的字节数是( )
A、3200 B、 25600 C、 16×1600 D、16×16
11、欲将一台商用机升级为一台多媒体电脑，必须在微机的主机箱内安装哪些设备
( )
A、硬盘 B、显示卡 C、视频捕捉卡 D、声卡
12、（ ）操作是Windows XP中最基本的操作。
A、菜单 B、画面 C、对话框 D、窗口
13、在WindowsXP中，下列正确的文件名是（ ）。
A、MY PROGRAM GROUP.TXT B、FILE1｜FILE2
C、A＜＞B.C D、＝A？B.DOC
14、在WindowsXP中，若己选定某文件，不能将该文件复制到同一文件夹下的操作是（ ）。
A、用鼠标右键将该文件拖动到同一文件夹下
B、先执行"编辑"菜单中的复制命令，再执行粘贴命令
C、用鼠标左键将该文件拖动到同一文件夹下
D、按住Ctrl键，再用鼠标左键将该文件拖动到同一文件夹下
15、在中文WindowsXP中，为了实现全角与半角状态之间的切换，应按的键是（ ）。
A、Shift+空格 B、Ctrl十空格 C、Shift十Ctrl D、Ctrl十F9
16、WindowsXP中“磁盘碎片整理程序”的主要作用是（ ）。
A、修复损坏的磁盘 B、缩小磁盘空间
C、提高文件访问速度 D、扩大磁盘空间
17、在Windows XP桌面的任务栏中，显示的是（ ）
A、当前窗口的图标 B、除当前窗口外的所有已打开的窗口图标
C、所有已打开的窗口图标 D、不含窗口最小化的所有被打开窗口的图标
18、在Windows XP中，任务栏是非常重要的。但是它（ ）
A、只能改变位置，而不能改变大小，也不能被隐藏
B、既可以改变位置，又可以改变大小，还可以被隐藏
C、可以改变大小，但不能改变位置，也不能被隐藏
D、不可以改变大小和位置，但能够被隐藏
19、任务管理器的功能是（ ）
A、结束程序 B、运行程序
C、查看正在运行的程序状态 D、以上都可以
20、下列( )键不属于二态转换键。
A、Caps Lock B、Num Lock C、Del D、Ins
21、下列表述中不能判断x是否为偶数的是( )
A、x/2=Int(x/2) B、x Mod 2=0 C、Fix(x/2)=x/2 D、x\2=0
22、设窗体上有1个滚动条,要求单击滚动条右端的微调按钮一次,滚动条移动一定的刻度值,决定此刻度的属性是( )
A、Max B、Min C、SmallChange D、LargeChang
23、设在窗体上有1个名称为Combo1的组合框,含有5个项目,要删除最后一项,正确的语句是( )
A、Combo1.RemoveItem Combo1.Text B、Combo1.RemoveItem 4
C、Combo1.RemoveItem Combo1.ListCount D、Combo1.RemoveItem 5
24、用于获得字符串S从第2个字符开始的3个字符的函数是（ ）
A、Mid$(S,2,3) B、Middle(S,2,3) C、Right$(S,2,3) D、Left$(S,2,3)
25、在窗体中添加一个命令按钮，名称为CMD1，然后编写如下程序；
Private Sub CMD1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 2 Then
Print "456"
End If
End Sub
Private Sub CMD1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) Print "123"
End Sub
程序运行后，在命令按钮上单击鼠标右键，则在窗体上显示的内容是（ ）
A、123456 B、456 C、456123 D、123
26、要清除图片框中的图片应使用以下哪种方法（ ）
A、Picture1.visible= false
B、Picture1.Cls
C、Picture1.picture=“”
D、Picture1.picture= LoadPicture(“”)
27、晶体三极管的主要特性是具有（ ）。
A、单向导电性 B、滤波作用
C、稳压作用 D、电流放大作用
28、某计数器最大输入脉冲数为15，组成该计数器所需最少的触发器个数为（ ）
A、2 B、3 C、4 D、15
29、某双极型三极管多级放大电路中，测得A =25，A =-10 ，A 1，则可判断这三级电路的组态分别是（ ）。
A、共射极、共基极、共集电极 B、共基极、共射极、共集电极
C、共基极、共基极、共集电极 D、共集电极、共基极、共基极
30、PN结加正向电压时，空间电荷区将（ ）。
A、变宽 B、变窄 C、基本不变 D、以上都不对
二、填空题（每个空格4分，共80分）
1、微型计算机系统可靠性可以用平均__ __工作时间来衡量。
2、将汇编语言程序翻译成与之等价的机器语言程序的程序是目标程序_。
3、目前微型计算机中常用的鼠标器有光电式和_机械式_式两类。
4．在多媒体计算机中，数字照相机属于表现媒体。
5、在WindowsXP中，若系统长时间不响应用户的要求，为了结束该任务，应使用的组合键是CTRL+ALT+DEL。
6、在Windows XP中，进行系统硬件设置的程序组称为控制面板。
7、在WindowsXP系统中，为了在系统启动成功后自动执行某个程序，应将该程序文件添加到目标文件夹中。
8、在WindowsXP中，为了清除“开始”菜单下“文档”菜单中的内容，应打开属性对话框。
9、“快捷方式”是一种特殊的 ，可以放在用户界面的任何地方。
10、Windows XP平台上的一切操作，均可以从单击 按钮开始。
11、语句DIM arr(-3 to 5, 2 to 6) AS INTEGER定义的数组元素有 个。
12、若要屏蔽框架上的控件对象，则需要设置 属性值为False。
13、产生区间[10，99]间随机整数的表达式为 。
14、在设计菜单时，要在菜单中加入一个菜单分隔项，则菜单分隔项的标题需设置为
。
15、在VB中，设A=2，B=-4，则表达式A^3\4>5+B AND “AB”<“12”的值是 。
16、在ＶＢ中，要删除列表框（Ｌist1）中的指定的项目应使用的方法为 .
17、单级共射放大器对信号有放大和 两个作用。
18、多级放大器的几种耦合方式中，各级静态工作点会相互影响的是采用 耦合。
19、若三级放大电路中Au1 = Au2dB， 30 =Au3dB，则其总电压放大倍数 20 = 倍。
20、用4个触发器可以存储 位二进制数。
三、分析计算题（共30分）
1、用卡诺图化简：
Y（A，B，C，D）= Sm（0，1，2，3，4，5，8，10，11，12）(10分)
2、已知逻辑电路图及C脉冲波形，试画出输出Q0，Q1的波形（设Q0，Q1的初始状态均为“0”）。并说明该电路具有的逻辑功能。
(10分)
3.计算（10分）
电路如图为分压式偏置放大电路，已知VCC=24V，RC=3.3KΩ，RE=1.5 KΩ,RB1=33 KΩ,RB2=10 KΩ,RL=5.1 KΩ,β=66 。试求：（1）静态值 、 和 ；（2）计算电压放大倍数；（3）空载时的电压放大倍数 ；（4）估算放大电路的输入电阻和输出电阻。（10分）
四、阅读分析题（阅读分析下面VB程序，将正确的运行结果填入指定的下划线上。每一题4分，共40）
1、dim x(3,5)
for i=1 to 3
for j=1 to 5
x(i,j)=x(i-1,j-1)+i+j
next j,i
print x(3,4)
上面程序运行时输出的结果为 。
2、以下程序段的输出结果为 。
X=1
Y=4
Do until y>4
X=x*4
Y=y+1
Loop
Print x
3、 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
private sub command1_click( )
Dim intA(4) As Integer
Dim intB(4) As Integer
Dim i As Integer
For i = 0 To 2
intA(i + 1) = i * 2 + 1
intB(3 - i ) = intA(i + 1)
Next i
Print intB(i)
End sub
程序运行后的结果是 。
4、在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
Static x As Integer
For i=1 To 2
y=y+x
x=x+2
Next
Print x,y
End Sub
程序运行后，连续三次单击Command1按钮后，窗体上最后一次的结果是 。
5、在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
Dim x As Integer
Do
X=x+1
s=s+x
x=(x+2)*x
loop until x>15
print “s=”;s,“x=”;x
End Sub
程序运行后的结果是 。
6、在窗体上画一个命令按钮，然后编写如下程序：
private sub command1_click()
dim i as integer
for I=0.5 to 8.5 step 2.5
s=s+I*10
next I
print s,I
end sub
程序运行后，单击命令按钮，在窗体上的的输出结果为 。
7、以下程序运行后，单击窗体，输出结果是
Private Sub form_click()
Dim m As Integer
Dim n As Integer
m = 3: n = 5
Print m, n, test(m, n)
End Sub
Private Function test(x As Integer, ByVal y As Integer)
x = x + y: y = x - y
test = x * y
End Function
8、在窗体上画一个命令按钮，然后编写如下程序：
Private sub command1_click ( )
Dim a(1 to ３,２ to 4) as integer
For I=1 to ３
For j=２ to 4
A(I,j)=I*2+j＊３
Next j
Next I
Print a(2,3)+a(3,2)
Endsub
程序运行后，单击命令按钮，在窗体上的的输出结果是 。
9、在窗体上画一个命令按钮，然后编写如下程序：
private sub command1_click( )
dim inta as integer
x=1
inta=inputbox("请输入a的值：")
select case inta
case 1 to 4
x=x+1
case 5 to 10
x=x+2
case 8
x=x+3
case else
x=x+4
end select
print x
end sub
程序运行后，单击命令按钮，在弹出的对话框中输入８，则窗体上的的输出结果是 。
10、在窗体上画一个命令按钮，然后编写如下程序：
private sub command1_click( )
FOR a=1 TO 5
y=1
FOR b=1 TO 5
FOR c=1 TO 5
y=y+c
NEXT c
NEXT b
NEXT a
PRINT “y=”；y
END sub
程序运行后，单击命令按钮，在窗体上的的输出结果为 。
五、程序填空题(请正确填充下面的VB程序，使其完成所要求的功能。每空2分，共30分)
1、下面函数计算两个非负整数m与n的最小公倍数。请在空白处填入适当内容将程序补充完整。
Private Sub command1_click()
Dim m As Integer
Dim n As Integer
m = Val(InputBox("请输入整数M：", m))
n = Val(InputBox("请输入整数N：", n))
For I = 2 To m
If m Mod I = 0 And _______(1)__________ Then
k = I
End If
_____(2)___________
s= (3)
print “最小公倍数为：”,s
End Sub
2、窗体上有一个名称为List1的列表框，一个名称为Text1的文本框，一个名称为Label1、Caption属性为“Sum”的标签，一个名称为Command1、标题为“计算”的命令按钮。程序运行后，将把1～100之间能够被7整除的数添加到列表框中。如果单击“计算”按钮，则对List1中的数进行累加求和，并在文本框中显示计算结果，如图所示。以下是实现上述功能的程序，请填空。
Private Sub Form_Load()
For i=1 To 100
If i Mod 7 =0 Then
(4)
End If
Next
End Sub
Private Sub Command1_Click()
Sum = 0
For i = 0 To (5)
Sum = Sum + (6)
Next
Text1.Text = Sum
End Sub
４、求所有满足条件的四位数ＡＢＣＤ，它是１１的倍数，且第三位数加上第二位数等于第四位数（即Ａ＝Ｂ＋Ｃ）。
Private sub command1_( )
Dim I as integer
Dim b as integer,c as integer
For I= (7)
B= i \100 mod 10
C= (8)
If (9) and a=b+c then
Print I;
End if
Next I
End sub
5、根据如下图形，完成程序填空：
Private Sub command1_click()
Dim I As Integer, j As Integer
s = 65
For I = 1 To 3
Print tab(20-I)；
For j = 1 To I
Print Spc(1); （10） ;
（11）
Next j
（12）
Next I
End Sub
6.打印输出如下数组的前２０项,并要求每行输出４个数：
１，１，３，７，１７，４１……
private sub command1.click( )
dim a(1 to 20) as long
a(1)=1
a(2)=1
for I= (13) to 20
(14)
next I
for I=1 to 20
print a(i);
if (15) then
print
end if
next I
