2.2 对判定的测试 示例源代码: Dim a,b As Integer Dim c As Double if (a>0 And B>0) Then c = c/a End if if (a>1 OR c>1) Then c = c+1 End if c = b + c 程序流程图 入口 c=b+c (a>0 and B>0 (a>1 or c>1 c = c / a c = c + 1 s a