vb标准课时第04章 VB基本语句(8学时).ppt

4.3 分支结构;例：用辗转相除法写出求两个自然数的最大公约数的算法;4.算法分类 数值算法：用于解决一般数学解析方法难以解决的问题。 如：求超越方程的根、求定积分、解微分方程等 非数值算法：用于对非数值信息进行查找、排序等。;1.赋值语句; Boolean ? 数值型 True为-1；False为0 Boolean ? 数值型 非0为True；0为False;1.赋值语句;§4.2 顺序结构;InputBox函数---输入框; 按 钮： 可选。整型表达式，缺省值为 0 指定信息框中按钮数目、类型、图标类型， 缺省按钮等;值 按钮的设置 对应按钮名称 0 vbOKOnly---------------确定 1 vbOKCancel-------------确定、取消 2 vbAbortRetryIgnore---终止、重试、忽略 3 vbYesNoCancel---------是、否、取消 4 vbYesNo------------------是、否 5 vbRetryCancel----------重试、取消;;; 设计一个如下所示的提示框：; 符号常量 返回值 对应按钮 ;练习; 先对条件测试，根据测试的结果选择执行不同的分支; 例： If score = 60 Then Print 祝贺你考试通过！ End If Print “继续努力！” 等价于： If Score=60 Then Print “祝贺你考试通过！” Print “继续努力!!!” ;.;例： If score = 60 Then Print “祝贺你考试通过！” Else Print “考试未通过.” End If Print 继续努力！;F;例4：(思考)输入二级考试成绩，要求显示对应三级制的 评定。评定条件为： ;.;.;.;.;Select Case 测试表达式 Case 测试项1 A组语句 Case 测试项2 B组语句 …… Case Else n组语句 End Select;§4.3.3 条件函数（可选）;2. Choose函数----替代Select Case语句 格式： Choose ( 整数表达式、选项列表 );§4.3 选择结构;§4.3 选择结构;总 · 结;§4.4 循环结构;循环变量=循环变量+步长;程序代码： Dim I%, s % For I = 1 To 10 step 1 Next I Print I, s; Dim I, s As Integer For I = 1 To 10 s = s + I Next I Print I, s;S1 =0 S2 =0 For I = 1 To 1000 S1 = S1 + I Next I ;练习2：输入一个正整数，求个位数字之和;例：分析下列程序段的输出结果： Dim I As Integer, J As Integer J = 0 For I = 0 To 10 Step 2 I = I + 3 J = J + 1 Next I;1. Do While 条件 循环体 Loop;1. While循环;⑴ Do While 循环条件 循环体 Loop;⑵ D0 循环体 Loop While 条件;⑵ D0 循环体 Loop While 条件;⑴ Do While 条件 循环体 Loop;练习3：用辗转相除法求两自然数m、n的最大公约数和 最小公倍数;练习4：我国现有人口13亿，按人口年增长率0.8%计算，多少年后我国人口超过26亿。;执行过程:（先判断，后执行） 先判断循环条件： 条件为假: 执行循环体,