xx门
考试范围：xxx；考试时间：xxx分钟；出题人：xxx
姓名：___________班级：___________考号：___________
注意事项：
1．答题前填写好自己的姓名、班级、考号等信息
2．请将答案正确填写在答题卡上
1.以下说法错误的是（ ）
B．考级.mdb是数据库文件
C．DBMS是数据库管理系统
D．考级.xls是数据库应用软件
2.以下哪项能够体现现代信息技术对人类社会产生的影响（ ）
①多媒体课件能够让教学有声有，从而提高教学的生动性
②人们用手机短信给亲朋好友上一份祝福
③人们通过网络了解身边发生的事情
④足不出户的缴纳各种费用让人们的生活越来越便利
⑤一些优秀院校把上课的视频放到网上供人分享
A．①③④⑤
B．①②④⑤
C．①②③④⑤
D．①②③④
3.国产手机制造商华为推出的最新款的手机能够有语音关机的功能，这里用到了( )
A．手写识别技术
B．语音识别技术
C．指纹识别技术
D．视网膜识别技术
4.下列属于可执行文件的是（ ）。
A． B．信息技术.txt C．鲁迅.doc D．abc.wps
5.下面两幅图均为100*100像素、24的BMP图像，其存储容量依次为a、b,则下列说法正确的是：（ ）
A．a比b大
B．a比b小
C．a、b一样，都为29.3K
D．a、b一样，都为6.1K
6. 当一个表达式同时包含算术运算、关系运算或逻辑运算时，其运算的优先级为：算术运算 关系运算，逻辑运算 关系运算。
A．高于、低于 B．低于、高于 C．高于、高于 D．低于、低于
7.我们利用电脑听歌、看电影，这时我们获得的是( )。
A．文本信息 B．多媒体信息 C．英文信息 D．声音信息
8.下列4幅图均为600*480像素、24位的bmp图像，其存储容量依次为甲、乙、丙、丁。
下列说法正确的是（ ）
A．甲最小
B．丁比丙大
C．乙最大
D．甲、乙、丙、丁一样大
9.某网站用户注册界面如图所示，用户信息相关的数据库使用Access设计， 下列说法不正确的是（ ）
A．用户成功注册一个新账号，数据库中将增加一个字段
B．可以将“用户名”相应字段的类型设置为文本类型
C．可以将“是否有车”相应字段的类型设置为“是/否”类型
D．用户成功注册后，“”字段对应的记录不能为空
10.有效获取信息的过程有 ① 确定信息来源 ② 明确信息需求 ③ 采集信息 ④ 保存信息
正确的排列顺序是 （ ）
A．①②③④ B．②①③④ C．①②④③ D．②①④③
11.在Excel 2003中，向单元格输入数据时，按一下回车键之后，是在单元格内进行换行。（ ） 12.垃圾信息、虚假信息、污秽信息等不仅污染信息环境，还容易造成严重的社会问题。（ ）
13.在Windows系统中，文件名不允许使用空格和数字。（ ）
14.因特网起源于英国的ARPAnet。（ ）
15.智能ABC 输入法属于形码。（ ）
16.下列VB程序运行时，在文本框Text1中输入“h”后，单击命令按钮Command1后，标签框Label1中显示的内容是____ ____。 Private Sub Command1_Click（）
Dim a As String
a = Text1.Text
a = Chr（Asc（a） - 32）
Label1.Caption = a
End Sub
17.小明利用所学的知识帮助语文老师设计一个语文学考等级查询系统，要求如下：输入某个等级，就能查出该等级的所有学生学号和姓名，并统计出该等级学生的人数，以便语文老师方便了解学生的学考情况。语文学考成绩分A、B、C、D、E五个等级，学生信息存储在数据库文件“stugrade.accdb”的数据表“Chinese”中，数据表“Chinese”的结构如图1所示。
VB程序运行界面如图2所示，在文本框Text1中输入查询的等级，单击“查询”按钮Command1，在列表框List1中显示所有该等级的学生学号和姓名，并按照学号从小到大排序，并在标签Label2处显示学生的人数，如果人数为0,则在列表框中显示“没有该等级的学生”。按此要求编写程序如下，但加框处代码有错误，请改正。
Private Sub Command1_Click()
Dim stuna(1 To 100) As String '存放学生姓名的数组定义为stuna
Dim stunum(1 To 100) As String '存放学生学号的数组定义为stunum
Dim i As Integer, j As Integer, n As Integer
Dim t As String
'连接数据库
Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim strSQL As String
cn.ConnectionString = "Provider="Microsoft.ACE.OLEDB.12.0;Data" Source=" + App.Path + "\stugrade.accdb"
cn.Open
strSQL = "select * from Chinese where 语文等级='" + Text1.Text + "'"
Set rs.ActiveConnection = cn
rs.Open strSQL
n = 0
Do While Not rs.EOF
n =" n" + 1
stuna(n) = rs.Fields("姓名").Value
stunum(n) = rs.Fields("学号").Value
rs.NextMove '①
Loop
rs.Close
cn.Close
Set rs = Nothing
Set cn = Nothing
List1.Clear '清除列表框
ebscoIf n =" 0" Then
List1.AddItem "没有该等级的学生"
Else
For i =" 1" To n - 1 '按姓名排序
For j =" n" To i + 1 Step -1
If stuna(j) < stuna(j - 1)凤凰电视台 Then '②
t =" stunum(j):" stunum(j) =" stunum(j" - 1): stunum(j - 1) = t
t =" stuna(j):" stuna(j) =" stuna(j" - 1): stuna(j - 1) = t
End If
Next j
Next i
For i =" 1" To n
List1.AddItem stunum(i) + " " + stuna(i)
Next i
Label2.Caption = "该等级的学生共有" + Str(n) + "名"
End If
End Sub
（1）加框处①有错，应改为____________________________。（3分）
（2）加框处②有错，应改为____________________________。（3分）
18.编写VB程序，实现计算器的简单计算功能：通过0~9的数字和小数点符号输入计算数据，单击选择“+、-、*、/”等运算，最后点击“=”按钮在文本框Text1中显示运算结果。界面如第14题-1图所示，回答下列问题：
（1）要修改窗体的显示名称为“计算器”，应选择第14题-2图所示的 属性。
（2）为实现上述功能，输入数据是非常重要的部分，以下是数字按钮“1”中的代码，用于在Text1中输入数字“1”，请在划线处输入合适的代码。
Private Sub Command11_Click()
Dim fuhao As ① '用于存储+、-、*、/等运算符号
豫公网安备41160202000603
站长QQ:729038198
关于我们
投诉建议