1.选择题- (共14题)
2.
支付宝付款码是开发出的配合支付宝使用的付款的新方式。付款码给收银员扫一下就可以完成支付。支付宝付款码产生二维码的过程属于：（）
| A．信息的采集 | B．信息的编码 | C．信息的发布 | D．信息的表达 |
5.
A班一组同学的英语成绩分别为24、27、16、15、24、18，下列采用排序算法及第二遍的排序结果分别为（ ）
| 原始数据 | 24 | 27 | 16 | 15 | 24 | 18 |
| 第一遍 | 27 | 24 | 16 | 15 | 24 | 18 |
| 第二遍 | | | | | | |
| 第三遍 | 27 | 24 | 24 | 15 | 16 | 18 |
| 第四遍 | 27 | 24 | 24 | 18 | 16 | 15 |
| 第五遍 | 27 | 24 | 24 | 18 | 16 | 15 |
| A．冒泡排序，27 24 16 15 24 18 | B．冒泡排序，27 24 18 16 15 24 |
| C．选择排序，27 24 16 15 24 18 | D．选择排序，27 24 18 16 15 24 |
6.
下面是用于实现S=1*2+3*4+5*6+7*8+9*10的算法的流程图，则划线处分别应填写：（ ）
| A．S<=10 I←I+1 |
| B．I<=10 I←I+1 |
| C．S<10 I←I+2 |
| D．I<10 I←I+2 |
7.
一个成功的多媒体作品，创作前都会进行应用和创作需求分析，在进行创作需求分析时，一般不需要考虑的是：（ ）
| A．鲜明的主题思想 | B．多媒体作品的结构类型 |
| C．多媒体作品系统结构设计 | D．多媒体作品的主要内容 |
8.
下面两幅图均为100*100像素、24色的BMP图像，其存储容量依次为a、b,则下列说法正确的是：（ ）
| A．a比b大 |
| B．a比b小 |
| C．a、b一样，都为29.3K |
| D．a、b一样，都为6.1K |
9.
用Word软件在修订状态下编辑“两会”代表经典语录，部分界面如图：
如全部接受图中所示的修订内容，则最后一行的文字将变为（ ）
如全部接受图中所示的修订内容，则最后一行的文字将变为（ ）
| A．人都是有惰性，物质都是有惯性的 |
| B．人都是有惰性，物质是有惯性的 |
| C．人是有惰性，物质是有惯性的 |
| D．人是有惰性，物质都是有惯性的 |
13.
小王利用GlodWave编辑一段声音，通过状态栏的观察，该声音的存储容量的计算式子为（ ）
| A．44100*1411*2*60*2/8/1024/1024MB |
| B．44100*16*2*60*2/8/1024/1024MB |
| C．44100*1411*43.281*2/8/1024/1024MB |
| D．44100*16*43.281*2/8/1024/1024MB |
14.
使用GoldWave软件打开music.wav双声道音频文件，进行下列操作：
①将左声道的最后三秒设置为静音
②将两个声道的声音都提高5db
③删除右声道声音
④将文件保存为mp3格式
其中会影响文件存储容量的有：（ ）
①将左声道的最后三秒设置为静音
②将两个声道的声音都提高5db
③删除右声道声音
④将文件保存为mp3格式
其中会影响文件存储容量的有：（ ）
| A．① | B．①② | C．①④ | D．①③④ |
2.填空题- (共5题)
15.
现要求编写VB程序，界面如第2题-1图所示。程序功能如下：在文本框Text1中输入身份证号码，单击“识别”按钮Command1，在标签Label3中输出对应的性别。
具体方法为：
（1）若身份证号为15位，则根据第15位数字来判断，若为偶数则性别“女”，否则为“男”；（2）若身份证号为18位，则根据第17位数字来判断，若为偶数时则性别为“女”，否则为“男”。应用程序界面设计时，为添加“识别”按钮，应使用2图中“控件工具箱”中的 （填写相应编号），并修改3图“属性窗口”中，将 属性值设置为“识别”
请根据题意将下列程序补充完整
Dim x As String, n As Integer, s As String
x = Text1.Text
n = Len(x)
If n =" 15" Then
s = Mid( ① , Len(x), 1)
If Val(s) Mod 2 =" 0" Then
Text2.Text = "女"
Else
Text2.Text = "男"
End If
Else
s="Mid(x," 17, 1)
If ② Then
Text2.Text = "男"
Else
Text2.Text = "女"
End If
End If
具体方法为：
（1）若身份证号为15位，则根据第15位数字来判断，若为偶数则性别“女”，否则为“男”；（2）若身份证号为18位，则根据第17位数字来判断，若为偶数时则性别为“女”，否则为“男”。应用程序界面设计时，为添加“识别”按钮，应使用2图中“控件工具箱”中的 （填写相应编号），并修改3图“属性窗口”中，将 属性值设置为“识别”
请根据题意将下列程序补充完整
Dim x As String, n As Integer, s As String
x = Text1.Text
n = Len(x)
If n =" 15" Then
s = Mid( ① , Len(x), 1)
If Val(s) Mod 2 =" 0" Then
Text2.Text = "女"
Else
Text2.Text = "男"
End If
Else
s="Mid(x," 17, 1)
If ② Then
Text2.Text = "男"
Else
Text2.Text = "女"
End If
End If
16.
王五为学生们设计了学校食堂学生校园卡查询系统，在终端机上输入学生的校园卡卡号，可以查出该卡对应的学生姓名及相应的余额。
校园卡信息存储在一个综合的数据库“school.mdb”,其中的“Yue”数据表用来存储学生的校园卡基本信息，包括学号（num）、姓名（name）、余额（money）,括号内的为对应字段名。下列VB程序用来实现根据学号查询并显示学生姓名及余额，运行界面如图所示：
数据库文件与应用程序在同一文件夹中，在文本框Text1中输入学生的学号，单击“查询”按钮，在标签Label4、Label5中分别显示学生姓名和余额。
Private Sub Command1_Click()
Dim adocn As new connection
Dim adors As new recordeset
Dim str1 As string,str2 as string
Str1="”driver=microsoft" access driver(*.mdb);dbq=”&app.path&”\ .mdb”
Adon.open str1
Str2="”select" * from Yue where =’”+text1.text+”’”
Adors.open str2,adocn,adOpenDynamic,adLockOptimistic
If adors.eof then
Msgbox”你输入的学号不存在!”
Else
Label4. caption =adors.Fields(“name”).value
=adors.Fields(“money”).value
Endif
Adors.close
Adocn.close
End Sub
为了实现上述目标，在画线处填入合适的语句或表达式：
校园卡信息存储在一个综合的数据库“school.mdb”,其中的“Yue”数据表用来存储学生的校园卡基本信息，包括学号（num）、姓名（name）、余额（money）,括号内的为对应字段名。下列VB程序用来实现根据学号查询并显示学生姓名及余额，运行界面如图所示：
数据库文件与应用程序在同一文件夹中，在文本框Text1中输入学生的学号，单击“查询”按钮，在标签Label4、Label5中分别显示学生姓名和余额。
Private Sub Command1_Click()
Dim adocn As new connection
Dim adors As new recordeset
Dim str1 As string,str2 as string
Str1="”driver=microsoft" access driver(*.mdb);dbq=”&app.path&”\ .mdb”
Adon.open str1
Str2="”select" * from Yue where =’”+text1.text+”’”
Adors.open str2,adocn,adOpenDynamic,adLockOptimistic
If adors.eof then
Msgbox”你输入的学号不存在!”
Else
Label4. caption =adors.Fields(“name”).value
=adors.Fields(“money”).value
Endif
Adors.close
Adocn.close
End Sub
为了实现上述目标，在画线处填入合适的语句或表达式：
17.
小王设计了一个程序来列举仁川亚运会的奖牌前三的国家。下列VB程序实现如下功能：单击命令按钮Command1后，在列表框List1中按奖牌数由多到少显示国家名称，如图。
请根据算法将下列程序补充完整。
Dim a(1 To 45) As String
Dim b(1 To 45) As Integer
Private Sub Form_Load()
a(1) = "中国"
b(1) = 308
‘45个代表团名称及奖牌数分别放在a(1)到a(45)及b(1)到b(45)中
End Sub
Private Sub Command1_Click()
Dim i As Integer,j As Integer
Dim t As Integer,f As Integer
List1.Clear
For i =" 1" To 3
For j = To 2 Step -1
If Then
f =" a(j):" a(j) =" a(j" - 1): a(j - 1) = f
t =" b(j):" b(j) =" b(j" - 1): b(j - 1) = t
End If
Next j
Next i
For i =" 1" To 3
List1.AddItem "第" + Str(i) + "名" + a(i) + " 奖牌数" + Str(b(i))
Next i
End Sub
请根据算法将下列程序补充完整。
Dim a(1 To 45) As String
Dim b(1 To 45) As Integer
Private Sub Form_Load()
a(1) = "中国"
b(1) = 308
‘45个代表团名称及奖牌数分别放在a(1)到a(45)及b(1)到b(45)中
End Sub
Private Sub Command1_Click()
Dim i As Integer,j As Integer
Dim t As Integer,f As Integer
List1.Clear
For i =" 1" To 3
For j = To 2 Step -1
If Then
f =" a(j):" a(j) =" a(j" - 1): a(j - 1) = f
t =" b(j):" b(j) =" b(j" - 1): b(j - 1) = t
End If
Next j
Next i
For i =" 1" To 3
List1.AddItem "第" + Str(i) + "名" + a(i) + " 奖牌数" + Str(b(i))
Next i
End Sub
18.
从“APEC蓝”到“两会蓝”，空气质量已经越来越影响到人们的生活。下表是2015年3月14日浙江省城市空气质量指数日报：
（1）在输入序号的时候，发现每次输入“001，002…”时电脑总是会自动把前导零省略掉，为了输入这种带前导零的格式，我们可通过修改单元格格式的数字格式来实现，即把默认的常规格式改为 格式。
（2）依据“空气质量状况分析表”（1图）计算浙江省各个城市空气质量状况。小王想要看一下2015年3月14日浙江省空气质量指数为“轻度污染”的城市。
则小王进行的操作是：
选择数据区域
执行“筛选”命令
针对 设置筛选条件
（3）为各个城市排名（污染指数小的排名在前），小王利用百度百科查到了RANK()函数，函数功能如下：
他在仔细阅读之后进行了这样的设置（2图）
可结果如3图，明显与事实不符合，请你写出正确的函数设置
（4）图表可以更直观的反应当天各城市空气质量情况，如4图所示，我们可选择 区域来创建 类型的图表。
（1）在输入序号的时候，发现每次输入“001，002…”时电脑总是会自动把前导零省略掉，为了输入这种带前导零的格式，我们可通过修改单元格格式的数字格式来实现，即把默认的常规格式改为 格式。
（2）依据“空气质量状况分析表”（1图）计算浙江省各个城市空气质量状况。小王想要看一下2015年3月14日浙江省空气质量指数为“轻度污染”的城市。
则小王进行的操作是：
选择数据区域
执行“筛选”命令
针对 设置筛选条件
A． | B． |
C． | D． |
他在仔细阅读之后进行了这样的设置（2图）
可结果如3图，明显与事实不符合，请你写出正确的函数设置
（4）图表可以更直观的反应当天各城市空气质量情况，如4图所示，我们可选择 区域来创建 类型的图表。
试卷分析
-
【1】题量占比
选择题:(14道)
填空题:(5道)
-
【2】：难度分析
1星难题：0
2星难题：0
3星难题：0
4星难题：0
5星难题：0
6星难题：0
7星难题：0
8星难题：0
9星难题：19