select语句哪里错了

复制内容到剪贴板

代码:

<script language="vbscript">
dim score
score=inputbox("请输入你的成绩")
select case score
case is <60
msgbox "不及格"
case is<90
msgbox "及格"
case else
msgbox "优秀"
end select
</script>