单项选择题

现有如下一段程序：
Private Sub Command1_Click()
x = UCase(InputBox("输入:"))
Select Case x
Case "A" To "C"
Print "考核通过!"
Case "D"
Print "考核通过!"
Case Else
Print "输入数据不合法!"
End Select
End Sub
执行程序，在输入框中输入字母“B”，则以下叙述中正确的是( )。