粤教版（B版）信息技术八下 第三章程序设计综合应用测试题（含答案）

中小学教育资源及组卷应用平台
粤教版B信息技术八年级下册
第三章
程序设计综合应用
测试题
（考试时间：60分钟，满分：100分）
一、单项选择题（每题4分，共40分）
1、关于框架(Frame)控件的阐述不正确的是(
)。
A、它只是用来对单选按钮或复选框进行分组
B、它具有Caption、Font属性
C、为了将控件分组，首先需要绘制框架控件，然后绘制框架里面的控件
D、它支持click事件
2、用来设置粗体字的属性是（?
）。?
A.FontItalic??
B.FontName?
C.FontBold???
D.FontSize?
3、确定复选框是否被选中，应访问的属性是（
）。?
?A.Selected?
?
B.Value?
?
C.Checked????
D.Style
4.关于visual
Basic以下叙述中错误的是
(
)
A.Visual
Basic
是事件驱动型可视化编程工具
B.Visual
Basic应用程序不具有明显的开始和结束语句
C.Visual
Basic工具箱中的所有控件都具有宽度（Width）和高度（Height）属性
D.Visual
Basic中控件的某些属性只能在运行时设置
5.将定时器的时间间隔设置为1秒，那定时器的Interval属性值应为(
)。
A．1000??
B．1??
C．100??
?D．10
6.当设置了定时器的有关属性后，使窗体自动向下移动的语句是Move（
）。
?
A．Left，Top+100?
??B．Top+100???
C．Top-100??
D．Top=Top+100
在程序运行过程中，当改变字号时，如果把note控件的字体大小改为12，下列语句正确的是（
）。
A.note.FontSize=12
B.note.ForeColor
=12
C.note.FontItalic=12
D.note.FontBold=12
8.当改变文本颜色时，如把note控件中的前景颜色设置为红色，下列语句正确的是（
）。
A.note.FontSize=vbred
B.note.ForeColor
=vbred
C.note.FontItalic=vbred
D.note.FontBold=vbred
9.用来设置斜体字的属性是（?
?）。?
A.FontItalic??
B.FontName?
C.FontBold???
D.FontSize
10.用来设置下划线的属性是（?
?）。?
A.FontItalic??
B.FontUnderline?
C.FontBold???
D.FontSize
二、判断题（每题4分，共20分）
(
)11.分析问题、设计算法、编写程序及调试程序，这是一般程序设计的基本过程。
(
)12.进行VB程序设计时，我们经常要使用变量来保存变化的数据，变量的命名没有
规则，我们可以使用任意字符对变量进行命名。
(
)13.关系表达式的结果是一个逻辑值，即“真”或“假”，如:
a=3,
b=4，a>b表达式的值为“真”。
(
)14.在VB中，如果需要计算机重复执行某些语句，可在程序中使用分支结构语句。
(
)15.
CheckBox控件通常用于某选项的打开或关闭。
综合填空题（每题4分，共40分）
听说Windows系统自带的应用软件基本上都是用VB编写的，李鸣就想，我能不能也用VB编写一个简单的Windows应用软件呢?李鸣发现Windows附件中的记事本软件界面比较简单，用学过的知识能实现记事本一些最基本的功能，于是，李鸣开始跃跃欲试.....
16.李鸣做的简易记事本的界面没有用到以下控件（
）。
A.Textbox
B.Commandbutton
C.Optionbutton
D.Ftame
第一部分程序是对（
）进行编写。
A字形
B窗体
C颜色
D字号
18.第二部分程序是对（
）进行编写。
A字形
B窗体
C颜色
D字号
19.第三部分程序是对（
）进行编写。
A字形
B窗体
C颜色
D字号
20.当Option5被单击的时候，记事本（
）。
A
字体的字号为8
B
字体的字号为10
C
字体的颜色为蓝色
D
字体的颜色为红色
李鸣在商场看到打地鼠游戏，发现打地鼠是一-款有趣的游戏，游戏规则很简单，打中随机出现的地鼠就能得分。于是用VB来设计一个打地鼠的游戏。
21.第一部分程序的第一行定义的变量a为（
）。
A实型
B逻辑型
C整型
D字符型
22.开始结束按钮点击后触发的是（
）。
A图像
B时钟
C程序
D鼠标
23.第二部分程序2-5行是（
）结构。
A顺序
B循环
C分支
D条件
24.第三部分程序2-4行是（
）结构。
A顺序
B循环
C分支
D条件
25.第三部分程序第6行j的取值是（
）。
A
j=0,1,2,3,4,5,6,7,8,9,10,11,12
B
j=1,2,3,4,5,6,7,8,9,10,11,12
C
j=1,2,3,4,5,6,7,8,9,10,11
D
j=0,1,2,3,4,5,6,7,8,9,10,11
第三章
程序设计综合应用
测试题答案
一、单项选择题(每题4分，共
40分)
题目
1
2
3
4
5
6
7
8
9
10
答案
A
C
B
C
A
C
A
B
A
B
二、判断题(对的打√，错的打×，每题4分，共20分)
题目
11
12
13
14
15
答案
√
×
×
×
√
综合题(每空4分,共40分)
题目
16
17
18
19
20
21
22
23
24
25
答案
B
A
D
C
C
C
B
C
B
C
第三部分
Private
Sub
Option4_Click()
note.ForeColor
=
vbRed
End
Sub
Private
Sub
Option5_Click()
note.ForeColor
=
vbBlue
End
Sub
Private
Sub
Option6_Click()
note.ForeColor
=
vbBlack
End
Sub
第二部分
Private
Sub
Option1_Click()
note.FontSize
=
8
End
Sub
Private
Sub
Option2_Click()
note.FontSize
=
12
End
Sub
Private
Sub
Option3_Click()
note.FontSize
=
16
End
Sub
第一部分
Private
Sub
Check1_Click()
note.FontBold
=
Check1.Value
End
Sub
Private
Sub
Check2_Click()
note.FontItalic
=
Check2.Value
End
Sub
Private
Sub
Check3_Click()
note.FontUnderline
=
Check3.Value
End
Sub
第一部分
1
Dim
i,
a,
j
As
Integer
2
Private
Sub
Comstar_Click()
3
Timer1.Enabled
=
True
4
End
Sub
5
Private
Sub
Comstop_Click()
6
End
7
End
Sub
第二部分
1
Private
Sub
Image2_Click(Index
As
Integer)
2
If
Image2(Index).Picture
=
ds.Picture
Then
3
Image2(Index).Picture
=
em.Picture
4
sum.Caption
=
sum.Caption
+
1
5
End
If
6
End
Sub
第三部分
1
Private
Sub
Timer1_Timer()
2
For
i
=
0
To
11
3
Image2(i).Picture
=
em.Picture
4
Next
i
5
For
a
=
0
To
4
6
j
=
Int(Rnd
12)
7
Image2(j).Picture
=
ds.Picture
8
Next
a
9
End
Sub
21世纪教育网
www.21cnjy.com
精品试卷·第
2
页
（共
2
页）
HYPERLINK
"http://21世纪教育网(www.21cnjy.com)
"
21世纪教育网(www.21cnjy.com)