vb4-控制结构.pptVIP

* * * * * * * * * * * * * * 调试和排错 VB的三种模式 (1) 设计模式(设计) 可以进行程序的界面设计、属性设置、代码编写等。 (2) 运行模式(运行) 执行启动命令进入运行模式。在此阶段，可以查看程序代码，但不能修改。 (3) 中断模式(Break) 执行中断命令，进入中断模式。在中断模式下可以查看代码、修改代码、检查数据。 本章目录 调试和排错-插入断点 按下F9键 按F8键跟踪执行 鼠标指向所关心的变量 本章目录 本章小节 结构化程序设计三种结构 顺序结构、选择结构、循环结构 If…Then语句、Select Case语句、For与 Do循环语句 赋值语句与复合赋值语句 数据输出和输入 InputBox、MsgBox 常用算法 素数判定、级数求和、试凑法、迭代法解方程 思考题 1. 结构化程序设计有哪三种基本结构？ 2. MseBox与InputBox有何区别？ 3.多分支If语句与Select Case语句有何区别？ 4.如果事先不知道循环次数，如何用For…Next结构实现循环？ 4.语法错误、运行时错误和逻辑错误之间有何区别？ 本章目录 * * * * * * * * * * * * * * * * * * * * * * * * * * * * While i 4 i = i + 1 Wend Print Tab(30); i While-wend 使用举例 例4-11小红今年12岁,她父亲比她大30岁,编程计算几年后父亲比她大一倍,那时父女的年龄各为多少? Private Sub FORM_Click() DIM age as integer Age=12 While age*2 age+30 Age=age+1 Wend Print “经过”;age-12;”年” Print “小红父女的年龄分别是”;age+30;”和”;age End Sub 例4-11 Do…Loop循环语句 Do循环用于控制循环次数未知的循环结构。 形式1： Do { While|Until }条件 语句块 [Exit Do 语句块] Loop 形式1为先判断后执行，有可能一次也不执行； 形式2为先执行后判断，至少执行一次。 形式2： Do 语句块 [Exit Do 语句块] Loop { While|Until} 条件 本章目录 n=1:sum=0 Do while n=100 Sum=sum+n N=n+1 Loop Print “sum=”;sum n=1:sum=0 Do Sum=sum+n N=n+1 Loop while n=100 Print “sum=”;sum n=1:sum=0 Do until n100 Sum=sum+n N=n+1 Loop Print sum=”;sum n=1:sum=0 Do Sum=sum+n N=n+1 Loop until n100 Print “sum=”;sum Do…Loop流程 本章目录 循环例题 例 我国有13亿人口，按人口年增长0.8%计算，多少年后我国人口超过26亿。 解此问题两种方法，可根据公式： 直接利用标准函数对数可求得，但求得的年数不为整数；也可利用循环求得 。 本章目录 n = 0: Sum = 13 Do n = n + 1 Sum = Sum + 0.008 * Sum Loop Until Sum 26 Print Sum, n 例4.12 判断一个数是否素数。 素数就是除1和本身以外，不能被其他任何整数整除的数。根据此定义，判别某数m是否为素数最简单的方法就是依次用i=2~m-1去除，只要有一个数能整除m，m就不是素数；否则m是素数。 例4.12 判断一个数是否素数。 n=inputbox(“请输入一个正整数”) i=2 : k=int(n/2) Do while i=k If n mod i=0 then Exit do Else i=i+1 Loop If ik then print n;”是素数”else print n; “不是素数” 循环的嵌套 –多重循环 在一个循环体内又包含了一个完整的循环结构称为循环的嵌套。循环嵌套对For循环语句和Do…Loop语句均适用。 例1 计算 1! +2!+3!+……+n! 本章目录 n=val(text1 For i=1 to n p=1 for j=1 to i p=p*j n