初中信息技术（九年级上） 试题卷
参考答案和评分标准
第一部分：笔试试题（60分）
一、单项选择题（10小题，每小题3分，共计30分）
1 2 3 4 5 6 7 8 9 10
A B A A C D A C A B
二、综合题（3小题，其中第1小题8分，第2小题10分，第3小题12分，共计30分）
1.（1）Step 2
（2）s = s + i
（每空4分，共8分）
2. （1）Do While
（2）20
（每空5分，共10分）
3. （1）Is = 2,4,6 （2）Is > 10 ,Is < 20或者10 To 20
（3）Is > 20 （4）Case Else
（每空3分，共12分）
第二部分：上机操作题（40分）
二、操作题（SharePoint Designer操作题，时间15分钟，分值40分）
题号 评分项目 评分要求 分值
1 保存文件 不改名保存每个1分，改名每个1分 4分
2 界面设计 窗体标题 1分
左边3个标签每个1分，改属性每个1分 6分
中间3个文本每个1分，改属性每个1分 6分
右侧3个标签每个1分，改属性每个1分 6分
3 界面设计 按钮1分，改属性1分 2分
程序设计 Command1_Click() 得2分 2分
定义3个变量每个1分 3分
输入：a = Val(Text1.Text) 得1分，b = Val(Text2.Text) 得1分 2分
计算：c = a * b / 10 得1分 1分
输出：Text3.Text = Str(c) 得1分 1分
If 1分，else 1分 2分
Msgbox函数 每个1分 2分
4 结论 篮球鞋001 2分
附界面设计：
附完整程序：
写法1：
Private Sub Command1_Click()
Dim a As Single, b As Single, c As Single
a = Val(Text1.Text)
b = Val(Text2.Text)
c = a * b / 10
Text3.Text = Str(c)
If c <= 200 Then
MsgBox ("可以购买！")
Else
MsgBox ("对不起！买不起，请您放弃！")
End If
End Sub
写法2：
Private Sub Command1_Click()
Dim a As Single, b As Single, c As Single
a = Val(Text1.Text)
b = Val(Text2.Text)
c = a * b / 10
Text3.Text = Str(c)
If c > 200 Then
MsgBox ("对不起！买不起，请您放弃！ ")
Else
MsgBox ("可以购买！")
End If
End Sub
命题说明
一、命题意图说明
根据《2015年海盐县中小学信息技术学科命题评比活动》的要求，为加强初中信息技术学科学业评价研究，在注重考察基础知识的同时，多种形式突出考查学生运用所学知识分析问题、解答问题的能力，试题依据课标，鼓励学生开放性思考，促进学生信息素养全面发展、提高教师的业务素质。
在本次命题过程中始终遵循“导向性、基础性、规范性、创新性”四个原则，把握好试卷分值、试卷难度系数和考试时间长度的指标要求，本着以学生发展为本的理念，题型丰富，设计合理，做到了试卷内容与所使用的教材、考查大纲所列举的知识细目要求的基本一致。
二、命题设想
本份试卷，考查的是信息技术浙教版九年级第一第二单元课本内容，每个单元的内容分布按章节在整册教材的比重而进行均衡分布，旨在考核学生对教材所学的基础知识、基本操作技能的理解和掌握程度，以及学生运用此阶段所学知识和技能解决学习和生活中实际问题的能力与水平。
笔试部分考查学生算法与程序设计的基本知识，掌握基本的VB程序设计语言解决简单问题的情况。操作部分是考查学生运用VB软件设计并解决一个简单问题的技能。命题紧扣基础知识和基本操作技能，适当降低难度，整体试卷的难度系数在0.7—0.8之间，在整个试卷中，基本没有偏题和怪题，在综合题第3题的第2空要用到多分支Is对数据范围的一个表示，如果老师对第7课随堂练习有一定的扩展指导，这个空应该可以完成。
三、内容模块与难度分布：
题型 题 号 单元 难度 （A-容易 B-中等 C-较难） 具体章节
第一单元 第二单元
单项选择题 1 √ A 第一课 生活与算法
2 √ A 第二课 算法与流程图
3 √ A 第三课 初识VB
4 √ A 第三课 初识VB 第五课 顺序结构
5 √ A 第三课 初识VB
6 √ B 第四课 VB控件
7 √ √ B 第一课 生活与算法 第五课 顺序结构
8 √ B 第三课 初识VB 第五课 顺序结构
9 √ B 第六课 分支结构
10 √ C 第十课 枚举算法
综合题 1 √ A 第八课 For循环
2 √ B 第九课 Do循环
3 √ C 第七课 多分支结构
操作题 1 √ C 第三课 初识VB 第五课 顺序结构 第六课 分支结构
初中信息技术（九年级上） 试题卷
第一部分：笔试试题（60分）
单选题（本题有10小题，每小题3分，共30分）
1、程序设计语言的发展阶段不包括( )
A、自然语言 B、机器语言 C、汇编语言 D、高级语言
2、流程图的符号中，矩形框一般作为（ ）。
A、判断框 B、输入输出框 C、处理框 D、开始/终止框
3、VB中窗体文件的扩展名是（ ）。
A、frm B、bmp C、bas D、vbp
4、在下列选项中，不属于VB的对象的是（ ）
A、窗体的背景颜色 B、命令按钮 C、文本框 D、标签
5、有程序代码如下：text1.text=“visual basic” 则：text1、text和“visual basic”分别代表（ ）。
A、对象，值，属性 B、对象，方法，属性
C、对象，属性，值 D、属性，对象，值
6、要使标签控件显示时不覆盖其背景内容，要对（ ）属性进行设置。
（A）BackColor （B）BorderStyle （C）ForeColor （D）BackStyle
7、对赋值语句的描述正确的是（ ）
①可以给变量提供初值；
②可以将表达式的值赋给变量；
③可以给一个变量重复赋值；
④不能给同一变量重复赋值．
A、①②③ B、①② C、②③④ D、①②④
8、窗体Form1的Name属性是Frm1,它的单击事件过程名是（ ） 。
A. Form1_Click B.Form_Click C. Frm1_Click D. Me_Click
9、下列程序段执行结果为
x=5
y=-6
If Not x>0 Then x=y-3 Else y=x+3
Print x-y; y-x
A、-3 3 B、5 -9 C、3 -3 D、-6 5
10、下面程序段显示（ ）个“*”
For i = 1 To 5
For j = 2 To i
Print "*";
Next j
Next i
A、9个 B、10个 C、11个 D、12个
二、综合题（本题共3小题，其中第1小题8分，第2小题10分，第3小题12分）
1、要编程实现1+3+5+……+100的值，请填空完整。
Private Sub command1_Click()
Dim n As Integer, i As Integer, s As Double
n = 100
s = 0
For i = 1 To n
Next i
Print s
End Sub
2、把程序片段填写完整，并写出x的值是多少。
x=1
y=4
y<6
x=x*y
y=y+1
Loop
Print x
x的值是：
3、下面的程序用于根据文本框x中输入的内容进行以下处理：?
???若x中的值为2，4，6，则打印“x的值为2，4，6”；?
???若x中的值为10到20之间的数，则打印“x的值为10~20”；
?? 若x中的值为大于20的数，则打印“x?的值大于20”；
否则，打印“x不在范围内”；?
Private?Sub?Command1_Click()?
x = Val(Text1.Text)
Select Case x
Case?_______ ?
??????? Print?"x的值为2，4，6"
?????Case?_____________ _
????????? Print?"x的值为10~20"
?????Case?????????????????
??????? ?Print?"x的值大于20"?
_______________ ___?
??????Print?"x不在范围内"?
End?Select
End?Sub
第二部分：上机操作题（40分）
近年来网络技术的迅猛发展，网络购物已经成为当下最热门的购物渠道。小明同学在网购平台上看中了五双运动鞋，想在这五双中选择一双购买（原价和折扣详见商品折扣表）。但是小明的预算是不超过200元，更省钱最好，请你为小明设计一款软件，选择购买哪一双运动鞋最实惠。
商品折扣表：
商品名称 原价 折扣力度
篮球鞋001 488元 4折
篮球鞋002 458元 5折
跑步鞋001 398元 5折
跑步鞋002 358元 6折
徒步鞋001 339元 6折
软件设计要求：（如图）
（1）、新建一个VB工程，完成“折扣商品计算器”程序的设计。将工程文件以sale.vbp、窗体文件以sale.frm保存到考试目录“操作题”下；
（2）、窗体的标题为“折扣商品计算器”；窗体的左边有三个标签，Label1的属性为“商品原价a:”、Label2的属性为“折扣力度b:”、 Label3的属性为“折后价格c:”；它们的旁边分别有三个文本框，Text1用于商品原价、Text2用于输入折扣力度、Text3用于输出折后价格；在文本框的右边有三个标签，Label4的属性为“元”、Label5的属性为“折”、 Label6的属性为“元”；
（3）、单击“计算”按钮(Command1)，根据计算公式将相应的提示信息显示在标签Text3中；
计算公式为：折后价格=商品原价*折扣力度；如果折后价格不高于200元，MsgBox函数提示“可以购买！”；如果折后价格高于200元，MsgBox函数提示“对不起！买不起，请您放弃！”。请编程实现。
（4）、结论：最适合小明的运动鞋是（ ）。请填写商品名称
