《第4章 选择结构.ppt》由会员分享,可在线阅读,更多相关《第4章 选择结构.ppt(35页珍藏版)》请在优知文库上搜索。
Payweight0.2 weight50(weight50)0.5500.2 weight50 Private Sub Command2_Click()()Text1.Text=Text2.Text=End Sub Private Sub Command3_Click()()End End Sub If c a Then 用用C去比较去比较 Text4.Text=c CA成立,成立,C最大最大 Text5.Text=a Text6.Text=b Else If c b Then Text4.Text=a C=60 Then Text2.Text=及格及格 Else Text2.Text=不及格不及格 End If End Sub “退出退出”按钮代码按钮代码 Private Sub Command2_Click()()End End Sub