vb 6.0 select case 语句 的 is表达式怎么用

RT，感谢请各位大大热心帮助

---

格式是激激case is 在IS后面加上条明扮袜件缺纯！
比如：
Private Sub Command1_Click()
Dim i
i = InputBox("")
Select Case i
Case Is >= 90
Print "good"
Case Is >= 70
Print "cool"
Case Is >= 60
Print "great"
Case Is >= 0
Print "bad"
Case Else
Print "error"
End Select

End Sub

---

select case A
case 1
……
case is>和喊唤2
…唤凯…
end select
如果不用“is”，怎么表达第二条？渗友

---