正在加载图片...
7.1If语句 例7.5:学校对学习成绩优良的同学给予奖励 能改成下面的代码吗? If a+b+c>=285 or a >=90 And b >=90 And c >=90 or a=100 And b= 100 And c >=80 Then Labe14. Caption="不可获奖! End if If a +b+c>=285 Then Labe14. Caption="可以获奖! Elself a >=90 And b >=90 And c >=90 Then Labe14. Caption="可以获奖!" Elself a= 100 And b= 100 And c >=80 Then Labe4. Caption="可以获奖! Else Label4. Caption="不可获奖! End if End Sub例7.5:学校对学习成绩优良的同学给予奖励。 ▪ 编写代码: Private Sub Command1_Click() Dim a As Single, b As Single, c As Single a = Val(Text1.Text):b = Val(Text2.Text):c = Val(Text3.Text) If a + b + c >= 285 Then Label4.Caption = "可以获奖!" ElseIf a >= 90 And b >= 90 And c >= 90 Then Label4.Caption = "可以获奖!" ElseIf a = 100 And b = 100 And c >= 80 Then Label4.Caption = "可以获奖!" Else Label4.Caption = "不可获奖!" End If End Sub T 能改成下面的代码吗? If a + b + c >= 285 or a >= 90 And b >= 90 And c >= 90 or _ a = 100 And b = 100 And c >= 80 Then Label4.Caption = "不可获奖!" End If 7.1 If语句
<<向上翻页向下翻页>>
©2008-现在 cucdc.com 高等教育资讯网 版权所有