《总结程序结构》PPT课件.ppt

《《总结程序结构》PPT课件.ppt》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、VB程序设计程序控制结构程序设计方法：1、认真阅读题目，建立窗体（注：窗体不一样，编程方式也不一样）2、分析处理数据及操作先后关系3、转化为结构（流程图或N-S图）4、程序设计5、上机检查（调试）6、总结、改进7、推广应用注:1、掌握题目的分类，采用相应的程序结构和设计方法。2、同一个题目，完善程序的逻辑、算法、优化结构。0:程序设计IF<条件表达式>Then<语句组A>Else<语句组B>Endif如果条件成立<语句组A>否则<语句组B>判断结束1:IF选择块结构(1)基本格式：(2)执行方式：流程图条件表达式语句组AT语

2、句组BFEndif之后的语句示例：Ifscore>=60ThenPrint“祝贺你考试通过！”ElsePrint“考试未通过.”EndIfPrint"继续努力！"2:单行条件语句(1).基本格式If<条件>Then语句组A[Else语句组B](2).执行方式：流程图条件表达式语句组AT语句组BFif之后的语句示例：Ifscore>=60ThenPrint“通过！”ElsePrint“未通过.”Print"继续努力！"注：此语句没有Endif3:比较示例：从键盘上输入两个整数，并按从大到小输出。PrivateSubComman

3、d5_Click()‘方法1a=Val(InputBox("请输入一个正整数a"))b=Val(InputBox("请输入一个正整数b"))IfaCase<表达式表1>[<语句组1>][Case<表达式表2>[<语句组2>]]…[CaseElse[<语句组n>]]EndSelect示例：a=InputBox(“请输入一个字”)SelectCase

4、aCaseis=“。”Print“是句号”Case“，”Print“是逗号”Case"a"To"z"Print“是小写字母"Case“A”,”B”,”C”to“Z”Print“是大写字母"Caseis>”0”Print“可能是数字字符"EndSelectCaseis>=“0”andis<=“9”×(不能用not、and、or)5:条件结构示例1计算任意三角形的面积SPrivateSubCommand1_Click()‘方法1a=Val(InputBox("请输入三角形边长a"))b=Val(InputBox("请输入三角形边

5、长b"))c=Val(InputBox("请输入三角形边长c"))Ifa+b>cAnda+c>bAndb+c>aThenk=(a+b+c)/2s=Sqr(k*(k-a)*(k-b)*(k-c))PrintsElseMsgBox("输入的边长a、b、c不能组成三角形")EndIfEndSubPrivateSubCommand1_Click()‘方法2a=Val(InputBox("请输入三角形边长a"))b=Val(InputBox("请输入三角形边长b"))c=Val(InputBox("请输入三角形边长c"))‘注：输入的

6、边长a、b、c必须组成三角形,否则重新输入,直到成功为至DoWhile(a+b

7、teSubCommand1_Click()‘方法3a=Val(Text1.Text)b=Val(Text2.Text)c=Val(Text3.Text)Ifa+b>cAnda+c>bAndb+c>aThenk=(a+b+c)/2s=Sqr(k*(k-a)*(k-b)*(k-c))Text4.Text=sElseMsgBox("输入的边长a、b、c不能组成三角形")EndIfEndSub计算任意三角形的面积S假设广州市地铁1号线全长共有12站台，搭乘站数与车票价格的对应关系如下表:123456789101112站数123456

8、789101112价格112233445566提示:乘客输入当前站号及目的地站号,计算机报告(加收1元附加费)显示票价money（元）,若输入的站超越(1~12)，提示“ERROR！”。解题思路：输入：当前站号，目的站号判断输入的站号是否超界？不超界计算出搭乘站数n判断区段，计算出票价打印