UC知道还是道VB题
来源：百度知道 编辑：UC知道 时间：2024/06/06 11:09:42
Private Sub Command1_Click()
score = Val(Text1.Text)
Select Case score
Case score >= 86 And score <= 100
Label3.Caption = "优秀"
Case score >= 76 And score <= 85
Label3.Caption = "良好"
Case score >= 60 And score <= 75
Label3.Caption = "及格"
Case score < 60
Label3.Caption = "不及格"
Case Else
Label3.Caption = "输入成绩错"
End Select
End Sub
说明：这是条件语句题，运行后出现无论输入多少，都显示输入成绩错。直接按命令按钮，显示优秀。应该怎末改呢？
score = Val(Text1.Text)
Select Case score
Case score >= 86 And score <= 100
Label3.Caption = "优秀"
Case score >= 76 And score <= 85
Label3.Caption = "良好"
Case score >= 60 And score <= 75
Label3.Caption = "及格"
Case score < 60
Label3.Caption = "不及格"
Case Else
Label3.Caption = "输入成绩错"
End Select
End Sub
说明：这是条件语句题，运行后出现无论输入多少，都显示输入成绩错。直接按命令按钮，显示优秀。应该怎末改呢？
以下几行
Case score >= 86 And score <= 100
Label3.Caption = "优秀"
Case score >= 76 And score <= 85
Label3.Caption = "良好"
Case score >= 60 And score <= 75
Label3.Caption = "及格"
Case score < 60
改为：
Case 86 To 100
Label3.Caption = "优秀"
Case 76 To 85
Label3.Caption = "良好"
Case 60 To 75
Label3.Caption = "及格"
Case Is < 60
＝＝＝＝＝＝＝＝＝＝＝＝
既然用了Case，就不要再用If的格式写东西啦。
抱歉，你的问题太过弱智，我拒绝回答