输入一个成绩, 若大等90显示“优”,否则若大等80显示“良”,否则若大等70显示“一般”,否则若大等60显示“及格”,否则显示“不及格”
PRIVATESUB FORM_CLICK( )
DIM X AS SINGLE
X=VAL(INPUTBOX(“请输入一个成绩”))
SELECT CASE
CASE
PRINT “优”
CASE
PRINT “良”
CASE
PRINT “一般”
CASE
PRINT “及格”
CASE
PRINT “不及格”
END SUB
答案:【1】X【2】IS>=90【3】IS>=80【4】IS>=70【5】IS>=60【6】IS<60【7】END SELECT