第4讲 算法基础及基本语句.ppt

例：计算分段函数y的值。 Private Sub cmdCalculate_Click() Dim x As Single,y As Single x=val(Text1.Text) If x0 Then y=1/(x-5) Else If x5 Then y=3*x^2+4*x+5 Else y=Log(x) End If End If End Sub 演示：chap2 鼠标+按键 五、 循环结构 由一定的条件控制，反复执行某个程序段的程序结构称为循环结构。 循环结构分成两种：计数循环和条件循环。 1）条件循环（Do-Loop循环） [格式]：Do [While/Until 条件] 或 Do 循环体 循环体 Loop Loop [While/Until 条件] [功能]：根据条件成立与否，控制重复执行循环体。 [说明]：