现有如下一段程序： 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”，则以下叙述中正确的是( )。