資源簡介

中小學教育資源及組卷應用平臺
2020-2021學年度第二學期教學質量自查
粵教版B八年級信息技術
（考試時間：60分鐘，滿分：100分）
一、單項選擇題（每題2分，共50分）
計算機程序的三種基本結構是不包括（
）。
A.
順序結構
B.
條件結構
C.
分支結構
D.
循環結構
2.
要讓計算機根據不同的情況執行不同的任務時，可以采用（
）語句。
A.
順序
B.
條件
C.
分支或多分支
D.
循環
3.實現某段代碼重復執行的方法有:將代碼放入到（
）語句的循環體中。
A.
順序
B.
條件
C.
分支
D.
循環
4.Visual
Basic是一門基于面對(
)的程序設計語言。
A
過程
B
對象
C
用戶
D
管理員
VB中面對的對象包括（
）。
A窗體，控件
B代碼，控件
C
窗體，代碼
D控件，工程
以下（
）可以作為變量名。
A
6S
B
s6？
C
s_6
D
s
6
7.下列賦值語句錯誤的是（
）
A.S1=2
B.A+1=A
C.S=S+1
D.S=S+t
8.雙擊窗體中的對象后，VB將顯示的窗口是（
）
?A工具箱???????
B工程窗口
C代碼窗口???????D屬性窗口
9.當鼠標單擊時對應的事件名稱是(
)。
A.
Click
B.
Load
C.
DblClick
D.
KeyDown
10.當鼠標雙擊時對應的事件名稱是(
)。
A.
Click
B.
Load
C.
DblClick
D.
KeyDown
11.當鍵盤按鍵按下時，對應的事件名稱是(
)。
A.
Click
B.
Load
C.
DblClick
D.
KeyDown
12.當我們用VB設計好程序后，我們想發給別人欣賞，別人沒有按照VB編程軟件，這時候我們需要把文件（
）。
A.
保存工程
B.
保存窗體
C.
另存為工程
D.
生成工程.exe文件
13.通常對于同一個問題，不同的人會有不同的解決方法。在計算機中，我們把(
)
理解為用計算機解決問題的具體方法。
A.函數
B.算法
C.代碼
D.語言
14.要實現圖片的加載，需要用到(
)函數，它的功能是把指定存儲位置的圖形文件加載到窗體、圖片框或圖像框的Picture屬性中。
A.
Rnd
B.Int
C.
LoadPicture
D.
Integer
15.如果在VB中輸入代碼Text1.
Text=Rnd
3,
Text1
中得到的數據不可能是(
)。
A.1.5
B.
2.2
C.
1
D.3
16.在VB中輸入代碼Text1.
Text=Int(8.
6)時，Text1
里顯示的結果是（
）.。
A.8
B.9
C.-8
D.-9
17.關于框架(Frame)控件的闡述不正確的是(
)。
A、它只是用來對單選按鈕或復選框進行分組
B、它具有Caption、Font屬性
C、為了將控件分組，首先需要繪制框架控件，然后繪制框架里面的控件
D、它支持click事件
18、用來設置粗體字的屬性是（?
）。?
A.FontItalic??
B.FontName?
C.FontBold???
D.FontSize?
19、確定復選框是否被選中，應訪問的屬性是（
）。?
?A.Selected?
?
B.Value?
?
C.Checked????
D.Style
20.關于visual
Basic以下敘述中錯誤的是
(
)
A.Visual
Basic
是一門簡單易學的程序設計語言
B.Visual
Basic應用程序不具有明顯的開始和結束語句
C.Visual
Basic工具箱中的所有控件都具有寬度（Width）和高度（Height）屬性
D.Visual
Basic中控件的某些屬性只能在運行時設置
21.將定時器的時間間隔設置為1秒，那定時器的Interval屬性值應為(
)。
A．1000??
B．1??
C．100??
?D．10
22.當設置了定時器的有關屬性后，使控件label向下移動的語句是（
）。
?
A．Left，Top+100?
??B．Label.Top+100???
C．Top-100??
D．Label.Top=Label.Top+100
23.在程序運行過程中，當改變字號時，如果把note控件的字體大小改為12，下列語句正確的是（
）。
A.note.FontSize=12
B.note.ForeColor
=12
C.note.FontItalic=12
D.note.FontBold=12
閱讀下圖，回答24-25題。
24.小明在編寫逐幀動畫的程序時，運行時如果出現右邊錯誤說明（
）
A.工程沒有保存
B.Timer1沒有定義
C.i沒有定義
D.Shape沒有定義
25.小明只需要在代碼的第一行輸入（
）語句就能改正錯誤。
A.Dim
i
as
integer
B.Dim
Shape
as
integer
C.i=0
D.Dim
i
二、判斷題（每題2分，共20分）
(
)26.在
VB中保存工程時，可以只保存窗體文件。
(
)27.
Visual
Basic的工程文件可以包含多個窗體。
(
)28.VB語言屬于計算機低級語言，人們使用起來很不方便。
(
)29.在VB中，變量的命名可以數字開頭。
(
)30.我們如要修改控件的名稱可以修改caption屬性。
(
)31.圖像框中自動調整圖形內容大小的屬性是stretch屬性。
(
)32.進行VB程序設計時，變量的命名沒有規則，我們可以使用任意字符對變量進行命名。
(
)33.在變臉程序設計中，我們可以直接設置圖像框的picture屬性加載圖片。
(
)34.在VB中，如果需要計算機循環執行某些語句，可在程序中使用分支結構語句。
(
)35.
在VB中，“=”表示賦值號。
三、綜合填空題（每題2分，共30分）
(一)
VB可視化編程界面
Visual
Basic是一種可視化的程序設計語言，VB的可視化編程界面給用戶提供了豐富的
控件對象資源，我們在開發程序前一定要先熟悉編程界面。
虛線框區域屬于（
）
窗體
B.工具箱
C.屬性窗口
D.菜單欄
如果虛線框區域不小心關閉了，可以在（
）菜單中調出。
A.文件
B.編輯
C.視圖
D.調試
38.根據上圖，被選中的對象名稱是（
）
A.開始
B.結束
C.Image1
D.Form1
39.顯示速度的按鈕是點擊（
）實現的。
40.為了查看程序運行情況，可以使用工具欄上的(
)
按鈕。
(二)
VB程序結構
在VB中有三種程序結構，其中的分支結構中有一種多分支結構，可以針對多種情況進行編程。在編寫移動的坦克游戲中，其中有這一段代碼
代碼中的第一行，我們可以得知程序如何觸發？（
）
A.單擊
B.雙擊
C.按下鍵盤
D.彈回鍵盤
42.代碼中的第三行，是編寫按（
）方向鍵的情況。
A.上
B.下
C.左
D.右
43.如果要編寫按“下”方向鍵的情況，keycode值應該是（
）
A.37
B.38
C.39
D.40
44.編寫多分支結構，我們用（
）語句。
A.IF
B.FOR
C.case
D.rnd
45.代碼中第五行是判斷（
）。
A.坦克是否到達最左邊
B.坦克是否到達最右邊
C.坦克是否到達最上邊
D.坦克是否到達最下邊
(三)
VB程序閱讀
李鳴在商場看到打地鼠游戲，發現打地鼠是一款有趣的游戲，游戲規則很簡單，打中隨機出現的地鼠就能得分。于是用VB來設計一個打地鼠的游戲。
46.第一部分程序的第一行定義的變量a為（
）。
A實型
B邏輯型
C整型
D字符型
47.開始結束按鈕點擊后觸發的是（
）。
A圖像
B時鐘
C程序
D鼠標
48.第二部分程序2-5行是（
）結構。
A順序
B循環
C分支
D條件
49.第三部分程序2-4行是（
）結構。
A順序
B循環
C分支
D條件
50.第三部分程序第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
2020-2021學年度第二學期教學質量自查
粵教版B八年級信息技術
答案
一、單項選擇題(每題2分，共
50分)
題目
1
2
3
4
5
6
7
8
9
10
答案
B
C
D
B
B
C
B
C
A
C
題目
11
12
13
14
15
16
17
18
19
20
答案
D
D
B
C
D
A
A
C
B
C
題目
21
22
23
24
25
答案
B
D
A
C
A
二、判斷題(對的打√，錯的打×，每題2分，共20分)
題目
26
7
28
29
30
31
32
33
34
35
答案
×
√
×
×
×
√
×
×
×
√
綜合題(每空2分,共30分)
題目
36
37
38
39
40
41
42
43
44
45
答案
B
C
C
D
A
C
C
D
C
A
題目
46
47
48
49
50
答案
C
B
C
B
C
Private
Sub
Timer1_Timer()
For
i
=
0
To
10
Step
1
Shape1(i).BackColor
=
RGB(Int(Rnd
256),
Int(Rnd
256),
Int(Rnd
256))
Next
i
End
Sub
1
Private
Sub
Picture1_KeyDown(KeyCode
As
Integer,
Shift
As
Integer)
2
Select
Case
KeyCode
3
Case
37
4
Image1.Picture
=
LoadPicture(App.Path
&
"\pic\tank1.jpg")
5
If
Image1.Left
-
20
<
0
Then
6
Image1.Left
=
0
7
Else
8
Image1.Left
=
Image1.Left
-
20
9
End
If
第一部分
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)

展開更多......

收起↑