双路径决策精讲.ppt

合作探究?构建新知 任务三：设计界面 任务四调试与运行 * 任务：如何在VB中让计算机感到幸福，就微笑呢？ （ 1）程序运行时，屏幕首先出示“If?you?feel?happy ” （用标签对象） ?（ 2）单击“确定”按钮，如果键盘输入“y”，那么感到幸福弹出”smile”的消息框， 否则感到不幸福弹出“sad”的消息框。  任务一：分析问题 字符是否是“y” 输入字符 弹出“smile”消息框 是 弹出“sad”消息框 否 用几何图形和文字说明直观地描述计算过程的流向。 标签 文本框 两个命令按钮 分支结构流程图： 条件成立吗？ 语句1 语句2 是 否 功能：如果条件成立，那么执行语句组1；否则执行语句组2 If 条件 Then 语句组1 Else 语句组2 End If If 条件 Then 语句组1 End If If 字符=“y” Then 弹出“smile”的消息框 Else 弹出“sad”的消息框 End If 任务三编写代码 功能：如果条件成立，那么执行then后的语句组1；否则else后的执行语句组2 功能：如果条件成立，那么执行then后的语句组1；否则退出If语句，执行End If后面的语句。 Private Sub Command1_Click() Text1.Text=“ “ t1=MsgBox(“ ,vbOKOnly+vbExclamation,系统提示) t1=MsgBox(“ ,vbOKOnly+vbExclamation,系统提示) End Sub if y then smile Else End If sad x=10 If x=0 then a=x Else a=-x End If ‘进入分支程序，如果x=0成立，那么运行a=x ‘否则运行a=-x Endif结束分析程序 ‘对x进行赋值，x的值10 a=10