第4章节算法基础与VB基本语句.pptVIP

注意 ? Is 比较运算符和使用在 Select Case 语句中的 Is 关键字并不相同： Is 作为比较运算符 ： 用来比较两个对象的引用变量； 语法：result = object1 Is object2； 说明：如果 object1 和 object2 两者引用相同的对象，则 result 为 True；否则，result 为 False。 Is 作为select case 中的关键字 ： 使用 Is 关键字时，则可以配合比较运算符（除 Is 和 Like 之外）来指定一个数值范围。如果没有提供，则 Is 关键字会被自动插入。 运行结果： 运行过程： 1）Print I 为 1 Next I 为 I = 1+4 = 5 2）Print I 为 5 Next I 为 I = 5+4 = 9 3）Print I 为 9 Next I 为 I = 9+4 = 13 步长 下转：第 4章VB教 材举例 \ 9(4.4.2-1) Evaluation only. Created with Aspose.Slides for .NET 3.5 Client Profile 5.2.0.0. Copyright 2004-2011 Aspose Pty Ltd. 下转：第 4章VB教材举例 \ 10(4.4.2-2) 举例：可改变循环终值和步长的循环语句演示程序： Option Explicit Private Sub Form_Click() Dim z, b, i, n As Integer z = 10 b = 1 n = 0 Print For i = 1 To; z; Step; b Print For i = 1 To z Step b n = n + 1 Print 第; n; 次循环,; i =; i; Print Next i =; i; +; b; =; i + b Next i Print Print 最后一次 i 值为 ; i; ，为此停止循环 End Sub Evaluation only. Created with Aspose.Slides for .NET 3.5 Client Profile 5.2.0.0. Copyright 2004-2011 Aspose Pty Ltd. 讨论： 1、循环次数的计算 循环次数=（循环终值 - 循环初值）/ 步长 + 1 Option Explicit Private Sub Form_Click() Dim i As Integer For i = 0 To 6 Step 2 Print i Next i End Sub 循环次数= 6 - 0 + 1 = 3+1 = 4 2 2、循环变量初、终值可以取正值、负值或零。步长可以 是正值或负值（尽量采用整型数），但不能为零（无意 义）。 Evaluation only. Created with Aspose.Slides for .NET 3.5 Client Profile 5.2.0.0. Copyright 2004-2011 Aspose Pty Ltd. * 新编 Visual Basic 程序设计教程 Evaluation only. Created with Aspose.Slides for .NET 3.5 Client Profile 5.2.0.0. Copyright 2004-2011 Aspose Pty Ltd. 第4章 算法基础与VB基本语句 4.1 算法基础 1、概念 解决某个问题所使用的方法和步骤。亦称算法设计 2、算法分类 1）数值计算算法。 例：四则运算、求微积分 2）非数值计算算法。例：数据的查找、分类、排序 3、算法描述 — 流程框图、流程图 举例：求2个学生的平均成绩。其中学生A为95分， B为70分。 方法：1）将95分赋予变量A，70分赋予变量B 2）A加B的值除以2，结果赋予变量C 3）打印输出C值 Evaluation only. Created with Aspose.Slides for .NET 3.5 Client Profile 5.2.0.0. Copyright 2004-2011 Aspose Pty Ltd. 根据以上题意绘出流程图： 图形说明：