设计者：张丽
单位：江苏省新海高级中学
Email：xhzhangli@hotmail.com
适应范围：算法与程序设计(选修)第二章
题干：某同学想用VB设计如下一个水电费管理系统：程序运行时,输入本月的耗水量和耗电量，单击“付款”时，则显示本月水电费应支出的总额。（水按每吨4元，电按每度0.5元收取）
1、建立应用程序界面和设置对象属性:
请在括号中填入工具箱中相应的控件所对应的字母，在下划线填上下列相关属性所对应的字母。
G、textH、forecolorO、captionP、topQ、WidthR、font
(1)双击工具箱中(),则在窗体出现“label1”控件,在属性窗口中把它的属性所对应的值修改为“耗水量”,若要修改它的字体和字号，则应该修改其属性
(2)双击工具箱中(),则在窗体出现“text1”控件,若将文本框中的“text1”文字去掉，则在属性窗口中把它的属性所对应的值修改为空白，若想调整该控件的宽度，则修改其属性。
(3)双击工具箱中(),则在窗体出现“command1”控件,在属性窗口中把其属性所对应的值修改为“付款”
2、编写事件处理程序。（请将代码补充完整）
PrivateSubCommand1_click()
DimaAsSingle
DimbAsSingle
DimsumAsSingle
A=val(text1.text)
B=val()
Sum={语句③}
="本月水电费共"+Str(Sum)+"元"
EndSub
3、新问题的解决。若某地区为鼓励居民节约用水，作了如下规定：若每月耗水量不超过20吨，每吨水按4元收取，若每月耗水量超过20吨（包括20），则每吨水按6元收取。程序中语句③该如何修改？
4、你还能利用程序的分支结构解决生活中的哪些问题？
命题思路：本题是一道综合性的过程化试题，涉及的知识点有标签控件、文本框控件、按钮控件、属性的设置，VB表达式、以及顺序结构，分支结构等。本试题贴近学生的生活，问题指向明确，考察学生的知识点全面。此题设计的情感态度价值观目标是：（1）让学生意识到现实生活中存在着丰富的程序设计问题，激发学生学习VB的兴趣；（2）培养学生节约用水的意识。
判分原则：最后两空每题2分，其他每题1分。最后两空每题都有多种答案，只要答对一个就可得分。