【填空题】

完善下列程序，在空白处填入正确的答案
Private Sub command1_click()
Dim x As Integer
x = InputBox("请输入学生成绩")
Select Case  ______  
Case  ______  >= 90   
Print "优秀" 
Case 80  ______  89   
Print "良好" 
Case 70 To 79   
Print " 中等" 
Case 60 To 69   
Print "及格" 
Case Else   
Print "不及格"
End Select
End Sub