vb显示缺少语句结束怎么办

问题描述

精选答案

直接点击结束就可以

正确语句如下：

Private Sub Command1_Click()

Dim scoore As Integer, temp As String

scoore = Val(Text1.Text)

temp = "成绩等级为:"

Select Case scoore

Case 0 To 59

Label2.Caption = temp + "不及格"

Case 50 To 69

Label2.Caption = temp + "及格"

Case 80 To 100

Label2.Caption = temp + "优良"

Case Else

Label2.Caption = "成绩出错!"

End Select

End Sub

楼上的别管成绩冲突不冲突，就是冲突语只是执行的结果正确与否问题，不会影响语法的。