第5单元 循环结构程序设计.ppt

  1. 1、本文档共42页,可阅读全部内容。
  2. 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
第5单元 循环结构程序设计.ppt

合肥师范学院 程序设计基础-VB语言 第5单元 循环结构程序设计 循环结构就是用于执行重复操作的结构。 在程序中如果遇到需要反复多次处理的问题,我们就可以用循环结构来实现。 第5单元 循环结构程序设计 第一节 循环结构控制语句 第二节 循环嵌套 循环结构复习 第三节 常用算法举例 实验 第一节 循环结构控制语句 本节知识点: 循环结构程序设计的概念,for循环, do 循环, while循环 。 第一节 循环结构控制语句 1.For循环语句 For 循环变量=初值 to 终值 [Step 步长] 语句块 [Exit For] Next 循环变量 说明: For语句的作用是确定循环变量的值如何变化,也就是用来控制循环的次数。 Exit for :退出循环,执行next后的下一条语句。 步长=1时,可省略。 第一节 循环结构控制语句 分析:S来存放累加和 S=0 S=S+1 S=S+2 S=S+3 …… S=S+100 过程归纳S=S+I(其中:I=0 to 100) 第一节 循环结构控制语句 第一节 循环结构控制语句 第一节 循环结构控制语句 2.Do ……loop循环 1)形式1:(当型循环) Do [{ While|Until }条件] 语句块 [Exit Do] 语句块 Loop 2)形式2:(直到循环) Do 语句块 [Exit Do] 语句块 Loop [{ While|Until} 条件] 第一节 循环结构控制语句 第一节 循环结构控制语句 编程计算:S=1+2+3+…+100 (用do-loop循环) 第一节 循环结构控制语句 3. While…Wend循环 使用格式如下: While 条件 循环块 Wend 说明:该语句的功能与Do While 条件…Loop实现的循环完全相同。 第一节 循环结构控制语句 编程计算:S=1+2+3+…+100 (用while循环) 第一节 循环结构控制语句 【练习】:教材P75,程序设计题第6题(水仙花数) 第一节 循环结构控制语句 例4.11 从键盘输入一些字符数据,对输入的字符数据进行计数。当输入的字符为“#”,停止计数并输出结果。 分析:因为输入次数不定,故不使用for 循环。 Private Sub Form_click() Dim c As String, n As Integer n = 0 c = InputBox( 输入字符:) While (c #) print c n = n + 1 c = InputBox( 输入字符:) Wend Print 字符数是:; n; 个 End Sub 第二节 循环嵌套 本节知识点: 循环的嵌套,循环的退出。 第二节 循环嵌套 1.循环嵌套—多重循环结构 如果在一个循环内完整地包含另一个循环结构,则称为多重循环,或循环嵌套,嵌套的层数可以根据需要而定,嵌套一层称为二重循环,嵌套二层称为三重循环。 第二节 循环嵌套 例4.13 使用循环语句在窗体上输出有*组成的简单图形 Private Sub Form_Click() Dim n As Integer, i%, j% Cls 清屏 n = Val(Text1.Text) 输入组成图形的行数 For i = 1 To n Print Tab(20); For j = 1 To i Print *; Next j Print Next i End Sub 第二节 循环嵌套 【练习】:教材P74选择题第5题 第二节 循环嵌套 2.循环的退出 语句格式: Exit For ‘强制退出For ……Next循环 Exit Do ‘强制退出Do ……Loop循环 例4.15 用For……Next循环结构计算1~100之和,当和大于等于2000时终止循环,并输出实际循环的次数。 第二节 循环嵌套 Private Sub Command1_Click() Dim s%, i% s = 0 累加前变量S为0 For i = 1 To 100 s = s +

文档评论(0)

xinshengwencai + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

版权声明书
用户编号:5311233133000002

1亿VIP精品文档

相关文档