初中信息技术九年级上学期期末试卷（含答案及评分标准）
文档属性
| 名称 | 初中信息技术九年级上学期期末试卷（含答案及评分标准） |  | |
| 格式 | zip | ||
| 文件大小 | 98.5KB | ||
| 资源类型 | 教案 | ||
| 版本资源 | 浙教版 | ||
| 科目 | 信息技术（信息科技） | ||
| 更新时间 | 2018-12-05 19:33:59 | ||
图片预览
文档简介
初中信息技术（九年级上）?试题卷
说明：试卷共分二部分。第一部分为笔试试题，包括单项选择题与综合题，测试时间为45分钟，满分60分。第二部分为上机操作题，测试时间为30分钟，满分为40分。?
第一部分 笔试试题（60分）
一、单选题（本题有16小题，每小题2分，共32分）
1.用VB开发程序的一般步骤是（ ）①界面设计②分析问题③编写代码④保存文件⑤调试与运行⑥生成可执行文件
A、①②③④⑤⑥ B、②①③⑤④⑥
C、②①③⑤⑥④ D、⑥②①③④⑤
2. 下面的流程图表示的程序的基本结构是( )
A．顺序结构
B．选择结构
C．循环结构
D．以上都不是
?
3.VB中，工程文件的扩展名是（ ）
A、frm B、vbp C、bas D、frx
4.VB中，命令按钮控件是（ ）
A、Label B、TextBox C、CommandButton D、Image
5. 关于VB中控件的操作下列说法错误的是( )
A、单击Delete键一次只能删除一个控件
B、单击Delete键一次可以同时删除多个控件
C、按住Shift键,依次单击每个要选择的控件,可以同时选中多个控件
D、按住Ctrl键,依次单击每个要选择的控件,可以同时选中多个控件
6. 在VB中，要设置窗口的标题内容，应使用（ ）属性。
A、Caption B、Text C、Font D、Name
7. 数学式(2a-b)/(2a+b)在VB中的正确写法是（ ）
A、(2*a-b)/(2a+b) B、(2*a-b)/2*a+b
C、(2a-b)/(2a+b) D、(2*a-b)/(2*a+b)
8.VB中，比较运算符中的不等于用（ ）来表示。
A、≠ B、<> C、>= D、<=
9. VB中，如果x=Val("123.45"),那么x的值为（ ）
A、123 B、123.45 C、12345 D、"123.45"
10. VB中，可以弹出一个对话框的函数是（ ）
A、Int( ) B、Rnd( ) C、Val( ) D、MsgBox( )
11. VB中，定义a为整型变量的语句是（ ）
A、Dim a As Integer B、Dim a As Single
C、Dim a As Data D、Dim a As Byte
12. x=1
z=0
For x=1 to 10 step 1
z=z+x
next x
以上程序段是（ ）结构。
A、顺序 B、分支 C、循环 D、流程
13. VB中,执行下面的程序段后， b的值为 ( )
a = 100
b = 20
a = a + b
b = a – b
A、100 B、120 C、20 D、80
14. 下列程序运行后，变量y的值为（）
x=20
if x>=100 then y=5*x else y=4*x
A、20 B、40 C、80 D、100
15. 下列程序段的运行结果是( )
x=3
Select Case x
Case 5
Print "优秀"
Case 4
Print "良好"
Case 3
Print "通过"
Case Else
Print "不通过"
End Select
A、优秀 B、良好 C、通过 D、不通过
16.下面程序段中s的结果是（ ）
s = 0
For i = 1 To 3
s = s + i
Next i
A、0 B、1 C、3 D、6
二、填空题（本题共3小题，第1、2题各9分，第3题10分，共28分）
1．填空①②③完成程序，使得单击"显示"按钮时，Label1、Label2分别显示30，10。程序代码:
Private Sub Command1_Click()
Dim x, y, t As Integer
x = 10
y = 30
If x < y Then
t = ①
x = ②
y = ③
End If
Label1.Caption = Str(x)
Label2.Caption = Str(y)
End Sub
2.读程序： Dim a,b,c As Integer
a = 1
b = 2
a = a + b
c = a + b * 2
程序结果 a= ① b= ② c= ③
3. 填空完成程序，编程计算1+1/2+1/3+1/4+...+1/99+1/100，单击窗体后，在窗体上显示结果。注：请不要更改源程序结构，，并在①②③位置填写正确的代码。
Private Sub Form_Click()
Dim s As Single
Dim i As Integer
s = ①
For i = 1 To ② Step 1
s = ③
Next i
Print "s="; s
End Sub
第二部分：上机操作题（40分）
1、编写程序，使用多分支（Select Case）语句结构对输入的学生成绩给出A、B、C和E四个等级判断。
要求，学生成绩由文本框（Text1）输入，结果显示在文本框（Text2）中。评分标准如下：
90≤成绩≤100 A
80≤成绩<90 B
60≤成绩<80 C
0≤成绩<60 E
其余成绩 无效 文本框（Text2）中显示“输入有误,请检查输入的成绩”
海盐县初中信息技术（九年级上）?答题卷 015.12
一、单选题（本题有16小题，每小题2分，共32分）
1 2 3 4 5 6 7 8
9 10 11 12 13 14 15 16
二、填空题（本题共3小题，第1、2题各9分，第3题10分，共28分）
1、①____________ ②____________ ③____________
2、①____________ ②____________ ③____________
3、①____________ ②____________ ③____________
答案及评分标准
第一部分：笔试试题（60分）
一、填空题(每题2分)
1-5 BCBCA 6-10 ADBBD 11-16 ACACCD
二、二、填空题（本题共3小题，第1、2题各9分，第3题10分，共28分）
1 x y t (各3分)
2 3 2 7 (各3分)
3 0(3分) 100(3分) s+1/i(4分)
第二部分：上机操作题（40分）
（15分，各控件每个3分）
Private Sub Command1_Click()
（2分）Dim x As Integer
（3分）x = Val(Text1.Text)
（2分）Select Case x
（2分） Case Is > 100
（2分） Text2.Text = "输入有误,请检查输入的成绩"
（1分） Case Is >= 90
（1分） Text2.Text = "A"
（1分） Case Is >= 80
（1分） Text2.Text = "B"
（1分） Case Is >= 60
（1分） Text2.Text = "C"
（1分） Case Is >= 0
（1分） Text2.Text = "E"
（2分） Case Else
（2分） Text2.Text = "输入有误,请检查输入的成绩"
（2分）End Select
End Sub
说明：试卷共分二部分。第一部分为笔试试题，包括单项选择题与综合题，测试时间为45分钟，满分60分。第二部分为上机操作题，测试时间为30分钟，满分为40分。?
第一部分 笔试试题（60分）
一、单选题（本题有16小题，每小题2分，共32分）
1.用VB开发程序的一般步骤是（ ）①界面设计②分析问题③编写代码④保存文件⑤调试与运行⑥生成可执行文件
A、①②③④⑤⑥ B、②①③⑤④⑥
C、②①③⑤⑥④ D、⑥②①③④⑤
2. 下面的流程图表示的程序的基本结构是( )
A．顺序结构
B．选择结构
C．循环结构
D．以上都不是
?
3.VB中，工程文件的扩展名是（ ）
A、frm B、vbp C、bas D、frx
4.VB中，命令按钮控件是（ ）
A、Label B、TextBox C、CommandButton D、Image
5. 关于VB中控件的操作下列说法错误的是( )
A、单击Delete键一次只能删除一个控件
B、单击Delete键一次可以同时删除多个控件
C、按住Shift键,依次单击每个要选择的控件,可以同时选中多个控件
D、按住Ctrl键,依次单击每个要选择的控件,可以同时选中多个控件
6. 在VB中，要设置窗口的标题内容，应使用（ ）属性。
A、Caption B、Text C、Font D、Name
7. 数学式(2a-b)/(2a+b)在VB中的正确写法是（ ）
A、(2*a-b)/(2a+b) B、(2*a-b)/2*a+b
C、(2a-b)/(2a+b) D、(2*a-b)/(2*a+b)
8.VB中，比较运算符中的不等于用（ ）来表示。
A、≠ B、<> C、>= D、<=
9. VB中，如果x=Val("123.45"),那么x的值为（ ）
A、123 B、123.45 C、12345 D、"123.45"
10. VB中，可以弹出一个对话框的函数是（ ）
A、Int( ) B、Rnd( ) C、Val( ) D、MsgBox( )
11. VB中，定义a为整型变量的语句是（ ）
A、Dim a As Integer B、Dim a As Single
C、Dim a As Data D、Dim a As Byte
12. x=1
z=0
For x=1 to 10 step 1
z=z+x
next x
以上程序段是（ ）结构。
A、顺序 B、分支 C、循环 D、流程
13. VB中,执行下面的程序段后， b的值为 ( )
a = 100
b = 20
a = a + b
b = a – b
A、100 B、120 C、20 D、80
14. 下列程序运行后，变量y的值为（）
x=20
if x>=100 then y=5*x else y=4*x
A、20 B、40 C、80 D、100
15. 下列程序段的运行结果是( )
x=3
Select Case x
Case 5
Print "优秀"
Case 4
Print "良好"
Case 3
Print "通过"
Case Else
Print "不通过"
End Select
A、优秀 B、良好 C、通过 D、不通过
16.下面程序段中s的结果是（ ）
s = 0
For i = 1 To 3
s = s + i
Next i
A、0 B、1 C、3 D、6
二、填空题（本题共3小题，第1、2题各9分，第3题10分，共28分）
1．填空①②③完成程序，使得单击"显示"按钮时，Label1、Label2分别显示30，10。程序代码:
Private Sub Command1_Click()
Dim x, y, t As Integer
x = 10
y = 30
If x < y Then
t = ①
x = ②
y = ③
End If
Label1.Caption = Str(x)
Label2.Caption = Str(y)
End Sub
2.读程序： Dim a,b,c As Integer
a = 1
b = 2
a = a + b
c = a + b * 2
程序结果 a= ① b= ② c= ③
3. 填空完成程序，编程计算1+1/2+1/3+1/4+...+1/99+1/100，单击窗体后，在窗体上显示结果。注：请不要更改源程序结构，，并在①②③位置填写正确的代码。
Private Sub Form_Click()
Dim s As Single
Dim i As Integer
s = ①
For i = 1 To ② Step 1
s = ③
Next i
Print "s="; s
End Sub
第二部分：上机操作题（40分）
1、编写程序，使用多分支（Select Case）语句结构对输入的学生成绩给出A、B、C和E四个等级判断。
要求，学生成绩由文本框（Text1）输入，结果显示在文本框（Text2）中。评分标准如下：
90≤成绩≤100 A
80≤成绩<90 B
60≤成绩<80 C
0≤成绩<60 E
其余成绩 无效 文本框（Text2）中显示“输入有误,请检查输入的成绩”
海盐县初中信息技术（九年级上）?答题卷 015.12
一、单选题（本题有16小题，每小题2分，共32分）
1 2 3 4 5 6 7 8
9 10 11 12 13 14 15 16
二、填空题（本题共3小题，第1、2题各9分，第3题10分，共28分）
1、①____________ ②____________ ③____________
2、①____________ ②____________ ③____________
3、①____________ ②____________ ③____________
答案及评分标准
第一部分：笔试试题（60分）
一、填空题(每题2分)
1-5 BCBCA 6-10 ADBBD 11-16 ACACCD
二、二、填空题（本题共3小题，第1、2题各9分，第3题10分，共28分）
1 x y t (各3分)
2 3 2 7 (各3分)
3 0(3分) 100(3分) s+1/i(4分)
第二部分：上机操作题（40分）
（15分，各控件每个3分）
Private Sub Command1_Click()
（2分）Dim x As Integer
（3分）x = Val(Text1.Text)
（2分）Select Case x
（2分） Case Is > 100
（2分） Text2.Text = "输入有误,请检查输入的成绩"
（1分） Case Is >= 90
（1分） Text2.Text = "A"
（1分） Case Is >= 80
（1分） Text2.Text = "B"
（1分） Case Is >= 60
（1分） Text2.Text = "C"
（1分） Case Is >= 0
（1分） Text2.Text = "E"
（2分） Case Else
（2分） Text2.Text = "输入有误,请检查输入的成绩"
（2分）End Select
End Sub