=400 ?S1=(X-400)*0.1+67 CASE score>=300 ?S2=(X-300)*" /> =400 ?S1=(X-400)*0.1+67 CASE score>=300 ?S2=(X-300)* - 作业答案大全" />

INPUT"请输入一个数"to score DO CASE CASE score>=400 ?S1=(X-400)*0.1+67 CASE score>=300 ?S2=(X-300)*

问题描述:

INPUT"请输入一个数"to score DO CASE CASE score>=400 ?S1=(X-400)*0.1+67 CASE score>=300 ?S2=(X-300)*
错在哪?

Private Sub Command1_Click()Dim str1 As String,str2 As String,scorestr1 = "成绩输入":str2 = "请输入一个百分制的成绩"Form1.Clslab1:score = InputBox(str2,str1)If IsNumeric(score) Thenscore = Val(score)I...