第五部分循环结构教学课件.ppt
《第五部分循环结构教学课件.ppt》由会员分享,可在线阅读,更多相关《第五部分循环结构教学课件.ppt(30页珍藏版)》请在三一文库上搜索。
1、第五章 循环结构,教学内容 循环语句 Timer控件和滚动条的使用,教学目标 掌握循环语句 掌握Timer控件和滚动条,5.1 循环语句,VB.Net主要提供了三种循环控制方式: ForNext WhileEnd While DoLoop,5.1.1 ForNext循环,For循环语句通常用于将一组语句重复执行指定的次数。 For循环的重复次数,可以由设定一个计数变量及其上、下限来决定。 语句形式如下(方括号中的内容为可选项): For 循环变量 = 初值 To 终值 Step 步长 语句块 Exit For 语句块 Next 循环变量 其中: 循环变量为必选项。其类型通常是 Integer,
2、但也可以是支持大于号 ()、小于号 () 和加号 (+) 的任何基本数值类型。 步长,每次循环后循环变量的增量。一般为正,初值小于终值;若为负,这时初值大于终值;如果省略了该项,则步长的默认值为1。 语句块是放在 For 和 Next 之间的一条或多条语句,亦被称为循环体。它们将被执行指定的次数。 Exit For,当遇到该语句时,退出循环(无论是否执行完指定次数),执行 Next 语句后面的语句。,例如:编写一个计算正整数的阶乘的程序。对任意正整数K,K!符号代表阶乘表达式,我们有: 为了解决这个问题,可以用一个For循环中的循环变量表示K的变化范围,在循环体中计算当前K值的阶乘。新建工程F
3、actorial,在窗体上添加一个Button和一TextBox控件。,为BtnStart按钮的click事件过程,添加下面的代码: Private Sub BtnStart_Click(ByVal_ sender As System.Object, _ ByVal e As System.EventArgs) Handles BtnStart.Click Dim lngResult As Long Dim i As Integer TxtOutput.Clear() lngResult = 1 For i = 1 To 15 lngResult = lngResult * i TxtOutp
4、ut.Text += i.ToString() + “!=“ + lngResult.ToString() _ + vbCrLf Next End Sub,阶乘程序的运行结果,如果一个三位数的个位数、十位数和百位数的立方和等于该数自身, 则称该数为水仙花数。编一程序求出所有的水仙花数。显然,水仙花数要在100999的范围内去找。我们对于这个范围内所有的数一一检验其是否符合水仙花数的定义。项目的建立同上,代码如下: Private Sub BtnStart_Click(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Ha
5、ndles BtnStart.Click Dim intMumber As Integer Dim intHandred As Integer Dim intTen As Integer Dim intSingle As Integer TxtOutput.Clear() For intMumber = 100 To 999 intHandred = intMumber 100 intTen = (intMumber 10) Mod 10 intSingle = intMumber Mod 10 If intMumber = intHandred 3 + intTen 3 + intSingl
6、e 3 Then TxtOutput.Text += intMumber.ToString() + “ = “ + _ intHandred.ToString() + “3 + “ + intTen.ToString() _ + “3 + “ + intSingle.ToString() + “3“ + vbCrLf End If Next End Sub,水仙花数的运算,5.1.2 While.End While 循环,While.End While 循环用于对一条件表达式进行计算,如果值为True,则执行循环体。每一次循环结束后,重新计算条件表达式。 While.End While与For
7、循环的差别在于: For循环循环次数是不变的,执行一定次数后结束循环。While循环的循环次数依赖与条件表达式的值,在不同情况下循环次数不一样。While型循环结构使用While语句实现,语句形式如下: While 语句块 End While 其中: 条件表达式的值必须为 True 或 False。 如果表达式的值为 Nothing,则结果将作为 False 处理。 当表达式的值True时,则执行While后的循环体直到遇到 End While 语句。随后控制返回到 While 语句并再次检查表达式结果。如果表达式仍为 True,则重复上面的过程。如果为 False,则从 End While
8、语句后面的语句开始执行。 在设计While型循环时要注意在其循环体内应该在适当的时候使条件表达式的值为False, 确保在执行了一定次数之后可以退出循环, 否则就成了“死循环”, 一旦程序进入这里, 将永远在循环结构中反复执行而无法结束。,编写一程序,计算1到100的整数和(1+2+3+100)。这道题非常简单,可以通过公式(1+100)*100/2立刻计算出结果。但这里采用逐项累加算法。新建和Factorial同样界面的项目,为BtnStart的Click事件编码如下: Private Sub BtbStart_Click(ByVal sender As System.Object, _ B
9、yVal e As System.EventArgs) Handles BtbStart.Click Dim intSum As Integer Dim i As Integer intSum = 0 i = 1 While i = 100 intSum = intSum + i i = i + 1 End While TxtOutput.Text = “1 + 2 + 3 + . + 100 = “ + intSum.ToString() End Sub,累加程序的运行结果,5.1.3 DoLoop循环,Do循环同样也是通过一个条件表达式来控制循环次数的循环结构。此种语句有两种语法形式,条件
10、前置的DoLoop结构和条件后置的DoLoop结构: Do While | Until 语句块 Exit Do 语句块 Loop Do 语句块 Exit Do 语句块 Loop While | Until 其中: 当条件表达式前置时,先计算表达式的值,因此当表达式的值在第一次计算时就为False时,循环体一次也不执行。当条件表达式后置时,先执行一次循环体再计算表达式的值,因此循环体至少被执行一次。 关键字 While 和 Until必选其一且只能选一个。While 用于指明条件表达式的值为True时就执行循环体中的语句;Until正好相反。 Exit Do 语句将执行 Loop 语句后面的语句
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 第五 部分 循环 结构 教学 课件
链接地址:https://www.31doc.com/p-3124253.html