《VB程序设计》PPT课件.ppt

《VB程序设计》PPT课件.ppt

ID:52066597

大小:989.00 KB

页数:57页

时间:2020-03-31

《VB程序设计》PPT课件.ppt_第1页
《VB程序设计》PPT课件.ppt_第2页
《VB程序设计》PPT课件.ppt_第3页
《VB程序设计》PPT课件.ppt_第4页
《VB程序设计》PPT课件.ppt_第5页
资源描述:

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

1、VisualBasic程序设计教程ptc.imust.cn内蒙古科技大学实践训练中心第五章VB控制结构5.1算法及其描述5.1.1算法的概念算法:是解决问题的有序步骤。每一步骤都必须是确定的、可行的,且不论何种情况,在经过有限步骤后,算法一定能结束。1、算法的特征例如:求N!,其算法可描述如下:步骤1:输入N的值;步骤2:设两个变量R、I,I为大于等于零的整数,R=I!。令I=0,R=1步骤3:I=I+1,R=R*I步骤4:判断I

2、性算法的有效性有零个或多个输入至少有一个输出5.1算法及其描述2、算法的描述⑴自然语言:自然语言存在着文字冗长、有二义性,表达不确切等缺点;⑵流程图:起止框数据框处理框判断框流程线⑶N-S图:是流程图的发展,去掉了流程图的流程线,全部算法都表示在一个矩形框内。5.1算法及其描述2、算法的描述开始输入NI=0R=1I

3、2、选择结构又称分支结构,根据给定的条件,选择执行一个分支的算法结构。在选择结构中,必然要包括一个条件判断。条件ABYN条件YNAB5.1算法及其描述5.1.2三种基本控制语句3、循环结构⑴当循环:首先判断条件是否成立,若成立,执行要循环的一组操作再返回到条件判断,决定是否继续循环;若不成立,跳过这组操作,执行此结构后面的操作。条件循环体YN条件循环体5.1算法及其描述5.1.2三种基本控制语句3、循环结构⑵直到循环:首先执行一遍要循环的操作,然后判断条件是否成立,若成立,则返回到这组操作的开始,重复执行这组操作;若不成立,执行此结构以后的操作。条件循环

4、体YN条件循环体5.2选择结构5.2.1单行结构条件语句格式:If<条件>Then<语句1>[Else<语句2>]功能:如果“条件”成立(其值为True)或为非0值,则执行“语句1”,否则执行“语句2”。其中:“条件”通常是关系表达式或逻辑表达式;“语句1”和“语句2”可为简单语句,也可为用冒号分割的复合语句;若省略”Else”,则If语句简化为:If<条件>Then<语句>条件语句(序列)下一条语句FalseTrue条件语句1语句2下一条语句TrueFalse5.2选择结构5.2.1单行结构条件语句例【5-1】输入三个数,输出其中最大值。解题思路:设置

5、一个变量max,将第一个数赋给max,然后依次和第二个、第三个数比较,将每次比较的大的数赋给max。开始输入a,b,cmax=ab>maxmax=bc>max输出maxFalseTrueFalseTruemax=cDimaAsSingle,bAsSingleDimcAsSingle,maxAsSinglea=Val(InputBox("输入第一个数:"))b=Val(InputBox("输入第二个数:"))c=Val(InputBox("输入第三个数:"))max=aIfb>maxThenmax=bIfc>maxThenmax=cFontSize=12P

6、rintPrinta;"、";b;"、";c;"中最大数是:";max5.2选择结构5.2.1单行结构条件语句例[5-2]编程求函数sgn(x)的值。解题思路:根据题意:x>0,sgn=1x=0,sgn=0x<0,sgn=-1DimXAsSingleX=Val(InputBox("输入一个数"))FontSize=13IfX>0ThenPrint1ElseIfX=0ThenPrint0ElsePrint-15.2选择结构5.2.2块结构条件语句格式:If<条件1>Then<语句块1>[Elseif<条件2>Then<语句块2>[Elseif<条件3>Th

7、en<语句3>[Else<语句块n>]EndIf⑴条件语句中的“条件”不但可以是逻辑表达式或关系表达式,还可以是数值表达式;⑵”语句块“中的语句不能与“Then”在同一行上,否则VB认为是一个单行结构的条件语句;⑶当省略Elseif子句和Else子句时,块结构就简化为:If<条件>Then<语句块>EndIf5.2选择结构5.2.2块结构条件语句条件1条件2条件n-1语句块n语句块1下一条语句语句块2语句块n-1FalseFalseFalseTrueTrueTrue5.2选择结构5.2.2块结构条件语句例【5-3】输入系数a,b,c,求二次方程:ax2+

8、bx+c=0的实根。d>0d=0X1=(-b+)/(2*a)X2=(-b-)/(

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。