首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗口上画一个名称为Commandl的命令按钮,然后编写如下事件过程: Private Sub Commmand1_Click() x=InputBox("Input") Select Case x Case 1,3 Print"分支
窗口上画一个名称为Commandl的命令按钮,然后编写如下事件过程: Private Sub Commmand1_Click() x=InputBox("Input") Select Case x Case 1,3 Print"分支
admin
2020-04-18
48
问题
窗口上画一个名称为Commandl的命令按钮,然后编写如下事件过程:
Private Sub Commmand1_Click()
x=InputBox("Input")
Select Case x
Case 1,3
Print"分支1"
Case Is>4
Print"分支2"
Case Else
Print"Else分支"
End Select
End Sub
程序运行后,如果在输入对话框中输入2,则窗体上显示的是
选项
A、分支1
B、分支2
C、Else分支
D、程序出错
答案
C
解析
本题考查switch结构。在Commandl的Click事件响应代码里面,通过InputBox输入数据给变量x,然后switch根据x的值输出不同的信息。在输入对话框中输入2,那么x的值为2,在switch的多个Case中CaseElse条件符合,因此输出的是“Else分支”。
转载请注明原文地址:https://www.kaotiyun.com/show/NeTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列程序执行后,变量a的值为()。Dima,b,C,dAsSinglea=10:b=20:c=40Ifb>aThend=a:a=b:b=dEndIfIfc>aThen
要建立一个随机文件记录学生的信息,如下定义的学生记录类型,由学号、姓名和5门课程成绩(百分制)组成,下列的定义正确的是()。
设置定时器控件的Interval属性为2000,Enabled属性为True,并且有下面的事件过程,程序运行时计算机将发出()次Beep声。SubTimer1Timer()BeepEndSub
单击一次命令按钮,下列程序代码的执行结果为()。PrivateSubCommand1_Click()DimaAsInteger,bAsInteger,cAsIntegera=2:b=3:c=4
已知数组Dima(1To10)AsInteger,则下面正确调用GetValue函数的是()。PrivateFunctionGetValue(a()AsInteger)AsIntegerFori=
下面正确使用动态数组的是()。
设有一个有10个元素的数组,下列程序将该数组的第1个元素与第10个元素交换,第2个元素与第9个元素交换……,第5个元素与第6个元素交换,在横线处应填写()。PrivateSubCommand1_Click()Dima(1
以下()操作不能触发滚动条Change事件。
一个工程中包含两个名称分别为Form1、Form2的窗体、一个名称为Func的标准模块。假定在Form1、Form2和Func中分别建立了自定义过程,其定义格式为:Form1中定义的过程:PrivateSubFunl()E
随机试题
简述新收订单与经济行情的关系
何技师在完成活动义齿整铸支架蜡型制作、包埋、焙烧后,欲进行铸造。以下哪些因素可能导致铸件出现冷热裂纹A.铸型冷却方式不合理B.熔金温度过高C.铸造压力过大D.铸型强度过大E.铸件厚薄不一
局部刺激病因不明,可能由多种因素引起
目前的火灾探测器按结构可分为哪些类型?对施工检测器具的选用应遵循哪些原则?
【背景资料】某高速公路穿越某旅游景区,其中K49+020—K19+530段原设计为填高10~20m的路堤,并需借土填方。建设单位要求施工单位加强环境保护,做到文明施工。因该地区申报4A级旅游景区,为保护该区域环境地貌,决定取消取土场。经相关各方协商,决
依法批准开工报告的建设工程,建设单位应当自开工报告批准之日起()日内,将保证安全施工的措施报送建设工程所在地的县级以上人民政府建设行政主管部门或者其他有关部门备案。
()的形成是人最初的社会稳定交往的开始。
简述sternberg的智力三因素理论。
论说文:根据下述材料,写一篇700字左右的论说文,题目自拟。杰克是一个嗜酒如命的人,后来因杀人罪而被判终身监禁。他有两个儿子,年龄相差才一岁,大儿子与他老爸一样有很重的毒瘾,靠偷窃和勒索为生,日前他因杀人罪而坐监。小儿子却担任一家大企业的分公司经
在当前文件夹中有一个名为“mytile.txt”的文本文件,其中有若干行文本。窗体中有如下事件过程:PrirateSubCommand1_Click()Dimch$.asciiAsIntegerOpen"myfile
最新回复
(
0
)