初中信息技术（九年级上）试题卷
姓名： 学号 得分
说明：试卷共分二部分。第一部分为笔试试题，包括单项选择题与综合题，测试时间为30分钟，满分60分。第二部分为上机操作题，测试时间为25分钟，满分为40分。
第一部分 笔试题（60分）
单项选择题（共20分，每题2分）
1．在VB程序中能把数值型转换为字符型需要使用的函数是（ ）?
A、?Str????B、?Val????C、?Chr?????D、?Sqr?
2. a表示“处理框”，b表示“输入、输出框”，c表示“起、止框”，d表示“判断框”，以下四个图形依次为 ( )
A、abcd B、dcab C、bacd D、cbad
3. 在VB程序设计阶段，当双击窗体上的某个控件时，所打开的窗口是（ ）
A、工程资源管理器窗口 B、工具箱窗 C、代码窗口 D、属性窗口
4．小明想学习一种计算机高级语言，下列哪个属于高级语言（ ）
A、photoshop B、汇编语言 C、Visual Basic D、flash
5．VB启动后，它的工作环境中的窗体，可用作定制应用程序界面的窗口，保存窗体后它的文件扩展名是（ ）
A、.frm B、.exe C、.vbp D、.pdf
6.下列属于正确的VB赋值语句的是（ ）
A、var=Text1.Text B、x+y=3 C、Label1.Caption=”hello” D、-x=b
7．小明要用VB语句描述"AB"是小于100的非负数，正确的是（ ）
A、0<=AB<100??????B、?0<=AB?Or?x<100? ?C、0<=AB?And?AB<100??????D、?0≤AB<100?
8．下列哪个不属于程序设计的基本结构（ ）
A、顺序结构 B、链接结构 C、分支结构 D、循环结构
9．请选出下列书写正确的语句（ ）
A、p=5 (a+b+p) B、if a>0 then b=b+1
C、t1.text=”请输入密码：” D、For i=1 to 10 do j=j*2
10．以下一段VB程序运行后，y的值是（ ）
Dim Y As Integer
Y=0
Do While Y<30
Y=(Y+2)*(Y+3)
Loop
A、60 B、72 C、34 D、156
二、综合题（共40分，11－12题每题10分，13题20分）
11．VB中我们常常会碰到控件属性及数据类型的使用，请将下列名称与功能正确连接：
FontSize 文本颜色
ForeColor 标题
Caption 单精度实数
Single 字体大小
Font 字体
12．请在原程序上指出本程序的语法错误，并写出程序结果
Private Sub Command1_Click()
Dim x As Integer
x = Val(Text1.Text)
Select Case x
Case Is >＝ 450
Text2.Text = "优秀"
Case Is >＝ 400
Text2.Text = "良好"
Case Is > 350
Text2.Text = "中等"
Case Is >＝ 300
Text2.Text = "及格"
Case Else
Text2.Text = "不及格"
End Select
End Sub
该程序运行后，若在文本框中输入350,则输出为：
13．输入两个数(a,b)，输出最大数(max)；根据题意完成流程图，并将对应的程序填充完整
(
说明：
text1.text
、
text2.text
、
text3.text
分别表示
a
，
b
，
max
的值
Private Sub Command1_Click
（）
Dim a AS Integer, b AS Integer
Dim max AS Integer
1
a=
(5)
1
b=
(6)
If
(7)
then
(8)
Else
(9)
(10)
End Sub
) (
开始
)
(
N
) (
Y
) (
结束
) (
(4)
) (
（
3
）
) (
（
2
）
) (
（
1
）
) (
输入
a
，
b
的值
)
第二部分 上机操作题（40分）
李玲是一个电脑爱好者，一天去超市购买东西，看到收银员结帐时冒出一个想法：用VB设计一个收款计算程序，这程序能完成：当输入物品的单价和数量，再根据超市提供的折扣（如8折就是总价乘以0.8）计算出应付款。回到家后马上将想法付诸了行动，由于她只是一个爱好者，没有真正学习过VB语言，所以在制作时遇到了困难，你能不能帮李玲呢？向她演示下面的操作：
程序界面如图所示。要求：
将程序界面按图设计好，并将三个输入文本框依次取名为T1、T2、T3，应付款文本框取名为yfk，每个文本框的初始值为空；
单击“计算”按钮可计算应付款。
单击“清除”按钮可清除应付款内容。
4）单击“退出”按钮可结束执行。
5）设计好后，以生成.exe的方式，将文件保存在桌面的“编程”文件内，文件名为“收款计算”。
提示：其中变量a表示单价， n 表示数量，k表示折扣， s表示应付款；integer 表示整数，single 表示单精度实数，end命令可结束执行。
标准答案及评分标准
笔试部分（共60分）
1、 单项选择题（每题2分，共20分）
1 2 3 4 5 6 7 8 9 10
A D C C A C C B B B
2、 综合题
11.连对一个得2分
FontSize 文本颜色
ForeColor 标题
Caption 单精度实数
Single 字体大小
Font 字体
12.每指出一处得2分，答案正确得2分
Private Sub Command1_Click()
Dim x As Integer
x = Val(Text1.Text)
Select Case x
Case Is >＝ 450
Text2.Text = "优秀"
Case Is >＝ 400
Text2.Text = "良好"
Case Is > 350
Text2.Text = "中等"
Case Is >＝ 300
Text2.Text = "及格"
Case Else
Text2.Text = "不及格"
End Select
End Sub
该程序运行后，若在文本框中输入350,则输出为： 及格
13.每空得2分
（1）a>b 或 a
a 或 b（2）max=a 或 max=b （与（1）答案相关联）
（3）max=a 或 max=b （与（1）答案相关联）
（4）输出max的值
（5）val(text1.text)
（6）val(text2.text)
（7）a>b 或 aa 或 b（8）max=a 或 max=b （与（7）答案相关联）
（9）max=a 或 max=b （与（7）答案相关联）
（10）End If（不区分大小写）
上机部分（共40分）
李玲是一个电脑爱好者，一天去超市购买东西，看到收银员结帐时冒出一个想法：用VB设计一个收款计算程序，这程序能完成：当输入物品的单价和数量，再根据超市提供的折扣（如8折就是总价乘以0.8）计算出应付款。回到家后马上将想法付诸了行动，由于她只是一个爱好者，没有真正学习过VB语言，所以在制作时遇到了困难，你能不能帮李玲呢？向她演示下面的操作：
1） 将程序界面按图设计好，并将三个输入文本框依次取名为T1、T2、T3，应付款文本框取名为yfk，每个文本框的初始值为空；（此题为27分）
能正确将窗体标题显示为“收款计算”，得1分；插入4个标签控件并将标题显示为“单位、数量、折扣、应付款”，得8分；插入4个文本框，并依次改名为T1，T2，T3，yfk，并清空初始显示值，得12分；插入3个命令按钮控件并将标题依次显示为“计算、清除、退出”，得6分；
1） 单击“计算”按钮可计算应付款。 执行正确得5分
1） 单击“清除”按钮可清除应付款内容。 执行正确得4分
1） 单击“退出”按钮可结束执行。 执行正确得2分
5）设计好后，以生成.exe的方式，将文件保存在桌面的“编程”文件内，文件名为“收款计算”。 执行正确得2分
设计意图
本试卷所涵盖的知识是九年级上算法与程序设计部分，力图通过本试卷中的各个小题考查学生在算法与程序设计上理论与应用的掌握情况，本试卷共分两大部分：笔试部分及上机部分，笔试部分，测试时间原为25分钟，考虑到测试内容是算法与程序设计，故改为30分钟，此部分有两大题，第一大题是单项选择，共10小题，从涵数、流程图、语句命令、窗体等方面考查学生VB语言的综合理论知识及应用能力；第二大题是综合题有3小题，一题是连线题，考查学生对控件常见属性及数据类型意义是否明确；一题是程序代码纠错及写答案题，主要是考查学生对于case语句的语法应用；一题是根据题意填流程图及补充程序，主要是考学生对于程序设计思路及代码应用能力。上机部分是一题程序设计题，考虑到学生第一次接触程序设计内容，故测试时间由原来的15分钟改为25分钟，本部分只有一大题：设计超市收款程序，给出界面，及属性要求，将根据功能按钮设计相应代码，这是一题综合应用题，考查学生利用VB设计程序界面、修改控件属性、编写代码等综合应用能力。
