现有如下一段程序：Private Sub Command1_Click() x＝UCase(InputBox("输入：")) Select Case x Case "A" To "C" Print "考核通过！" Case "D" Print "考核不通过 ！" Case Else Print "输入数据不合法！" End SelectEnd Sub执行程序，在输入框中输入字母“B”，则以下叙述中正确的是( )。
- A.程序运行错
- B.在窗体上显示“考核通过！”
- C.在窗体上显示“考核不通过 ！”
- D.在窗体上显示“输入数据不合法！”
热度🔥901
参考答案：B
解析：
【解析】程序中Ucase函数将输入的字母转换为大写，然后通过Select多分支控制语句选择输出不同信息，当输入字母在"A"到"C"之间时，显示"考核通过！"，输入的是"D"时显示"考核不通过！"，如果输入的是"A"到"D"之外的其他字符则显示"输入数据不合法！"。程序中输入字母"B"，因此会显示"考核通过！"。
【解析】程序中Ucase函数将输入的字母转换为大写，然后通过Select多分支控制语句选择输出不同信息，当输入字母在"A"到"C"之间时，显示"考核通过！"，输入的是"D"时显示"考核不通过！"，如果输入的是"A"到"D"之外的其他字符则显示"输入数据不合法！"。程序中输入字母"B"，因此会显示"考核通过！"。
复制题目向AI提问
扫码免费计算机二级刷题
2025年计算机等级考试题库
推荐
在窗体上画一个命令按钮，其名称为Command1，然后编写如下代码：Option Base 1Private Sub Command1_Click() Dim a a＝Array(1， 2， 3， 4) j＝1 For i＝4 To 1 Step－1 s＝s＋a(i)* j j＝j * 10 Next i Print sEnd Sub程序运行后，单击命令按钮，其输出结果是( )。
说明数组后，数组元素的初值是( )。
设有三张表，客户（客户号,姓名,地址），产品（产品号,产品名,规格,进价），购买（客户号,产品号,价格）。其中表客户和表产品的关键字（键或码）分别为客户号和产品号，则表购买的关键字为（ ）。
