首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
现有如下一段程序: Private Sub Command1_Click() x=UCase(InputBox("输入:")) Select Case x Case"A" To "C"
现有如下一段程序: Private Sub Command1_Click() x=UCase(InputBox("输入:")) Select Case x Case"A" To "C"
admin
2019-04-29
78
问题
现有如下一段程序:
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”,则以下叙述中正确的是( )。
选项
A、程序运行错
B、在窗体上显示“考核通过!”
C、在窗体上显示“考核不通过!”
D、在窗体上显示“输入数据不合法!”
答案
B
解析
程序中UCase函数将输入的字母转换为大写,然后通过Select多分支控制语句选择输出不同信息,当输入字母在“A”到“C”之间时,显示“考核通过!”,输入的是“D”时显示“考核不通过!”,如果输入的是“A”到“D”之外的其他字符则显示“输入数据不合法!”。程序中输入字母“B”,因此会显示“考核通过!”。
转载请注明原文地址:https://kaotiyun.com/show/yFUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在考生文件夹下有一个工程文件sjt4.vbp,要求程序运行后,如果多次单击列表框中的项,则可同时选择这些项。而如果单击“显示”按钮,则在窗体上输出所有选中的列表项(如图3-171所示)。要求:修改列表框的适当属性,使得运行时可以多选,并
下面的程序执行时,将把当前目录下的顺序文件smtext1.txt的内容读入内存,并在文本框Text1显显示出来。在横线处应填写()。PrivateSubCommandl—Click()DiminDataAsString
若将变量TestDate声明为Date类型,则下列为变量TestDate赋值的语句中正确的是()。
在运行阶段,要在文本框Text1获得焦点时选中文本框中所有内容,如图1所示,对应的事件过程是()。
设在工程中有一个标准模块,并定义了如下类型:TypeStutypeinoAsIntegerstmameAsString*20strsexAsString*2smarkAsSingle
窗体上有名称为Commandl的命令按钮和名称为Text1的文本框()。PrivateSubCommandlClick()Text1.Text=“程序设计”Text1.SetFocusEndSub
数列1,1,2,3,5,8,13,21,…的规律是从第三个数开始,每个数是它前面两个数之和。在考生目录下有一个工程文件sit5.vbp。窗体中已经给出了所有控件,如图3—87所示。请编写适当的事件过程实现以下功能:在Text1中输入整数40,单击“计算”按
有如下语句序列:Dima.bAsIntegerPrintaPrintb执行以上语句序列,下列叙述中错误的是
表达式12/2\4的值是
一棵完全二叉树共有360个结点,则在该二叉树中度为1的结点个数为()。
随机试题
驾驶机动车看到这样的儿童怎样行驶?(图4.9.2)
下列哪一项对诊断尿路感染最有意义
税负不容易转嫁的情形是()。
成本差异是指实际成本与相应标准成本之间的差额。这里的“实际成本”和“相应标准成本”分别是指()。
Youcansleeponthecouchinthelounge,______youcangotoahotelnearby.
这是一位教师在进行大班故事教学活动《小蝌蚪找妈妈》中的片段:在熟悉故事内容后,教师对幼儿提了这样几个问题:“你们喜欢这个故事吗?”“这个故事中有谁?”“为什么小蝌蚪问了这么多动物妈妈,它都没有找到自己的妈妈?”前面两个问题孩子们很快做出了回答,到
人的发展是一种建构的过程,充满着个体与环境间不断的相互作用。皮亚杰用来解释这一过程的术语有()
2015年2月,中共中央、国务院印发中央一号文件——《关于加大()力度加快农业现代化建设的若干意见》。
Herearesomemanagementtoolsthatcanbeusedtohelpyouleadapurposefullife.1.UseYourResourcesWisely.Yourdecisi
关系表中的每一横行称为一个( )。
最新回复
(
0
)