06VB程序设计综合应用1.ppt

VB程序设计综合应用 例1： 编程序计算： s=1+2+3+4+……+10 同一类题材，采用相同的程序结构 思考题： （1-1）s=1*2*3*4*5*……10 ? （1-2）s=2+4+6+8+……+20 ? （1-3） ps=1!+2!+3!+4!+5! ? （1-4） total=20+21+22+23+……+263 ? (1-5) ? (1-6) 前20项之和 ? （1-7）sum=1+1+2+3+5+8+13+21+…前20项之和 推广优化1: 用不同的语句实现题目要求。 while …… wend 循环结构代替for……next do while …… loop 循环结构代替for……next do …… loop while 循环结构代替for……next 推广优化2: 题目要求的延伸和扩大。 某一次实验得出一组数据，要求对这组数据求统计平均值。（结束条件-999） 总 结 1、对题目的分类，思考一下与已学习的那一种程序结构相近，采用相应的程序结构和设计方法。 2、同一个题目，可以用不同的语句来实现，采用最佳语句平实现操作。 3、对同类型的题目，能够拓展思维、延伸程序的逻辑、算法、优化结构。 选择结构案例1解决方案1 广州市地铁1号线全长共有12站台，搭乘站数与车票价格的对应关系如下表: 总结 1、对题目的分类，思考一下与已学习的那一种程序结构相近，采用相应的程序结构和设计方法。 2、同一个题目，可以用不同的语句来实现，采用最佳语句平实现操作。 3、对同类型的题目，能够拓展思维、延伸程序的逻辑、算法、优化结构。 V B 程序设计——综合应用 综合应用 分类、应用 完善、优化 例 1 应用 总结 例 2 优化 总结 程序设计方法： 1、认真阅读题目。 2、分析处理数据及操作先后关系 3、转化为结构 4、程序设计 5、上机检查（正确实现） 6、总结、改进 7、推广应用 教学目的: 1、掌握题目的分类，采用相应的程序结构 和设计方法。 2、同一个题目，完善程序的逻辑、算法、 优化结构。 项n取值=1、2、3、4、………. 10 得规律：后项=前项+1， 总和= 已累计部分和+当前项： Private sub form_click( ) Dim n%, s% S=0 For n=1 to 10 step 1 S=s+n Next n Print “s=”;s End sub For n = 1 to 10 step 1 s=s+n 输出求和的结果 求和运算 产生项目n当前值，且n=终止10 求和变量清0 解题思路： Private sub form_click( ) Dim n%, s% S=0 For n=1 to 10 step 1 S=s+n Next n Print “s=”;s End sub Private sub form_click( ) Dim n%, s% S=0 For n=1 to 10 step 1 S=s+n Next n Print “s=”;s End sub s=1+2+3+4+……+10 Private sub form_click( ) Dim n%, s% S=0 ：n=1 Do While (n=10) S=s+n : n=n+1 Loop Print “s=”;s End sub s=1+2+3+4+……+10 输入下一个实验数据x 输出求和的结果 求和运算 ：统计已输入的数据个数 计算平均值 判断x=-999终止 输入一个实验数据x 求和变量清0 解题思路： Private sub form_click( ) Dim n！, s！，x! S=0 ：n=1 X=val(inputbox(“输入实验数据”)) While (x-999) S=s+x : n=n+1 X=val(inputbox(“输入实验数据”)) wend Print “s=”; s/n End sub 1 2 3 4 5 6